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“Commodore  World” 
aparte  de  venderse  generalmente  en  kioscos, 
se  encuentra  asimismo  a la  venta 
en  los  siguientes  distribuidores  de  Commodore  y librerías. 


RUCANTE 

e Casa  Wagner.  c/  Juna  Carlos  I,  37.  Elda. 
Teléfono:  (965)  39  03  96. 

• Ferretería  Progreso,  c/  General  Jordana,  28. 
Elda.  Telefono:  (965)  38  11  45. 

BADAJOZ 

• Control  Sistemas.  Avda.  Santa  Marina,  25A. 
teléfono:  (924)  25  88  00. 

BARCEIONA 

Computer  Service.  Avda.  Abad  Marcet,  325. 
Tarrasa.  Teléfono:  (93»  788  63  77. 

• Computerhard.  c/  s.  Jaime,  48.  Granollers. 
teléfono:  (93)  870  09  19. 

• Gadesa.  Les  Valls,  12-14.  Sabadell.  Teléfono: 
(93)  725  25  43. 

• Librería  Emilia  Pérez  Kadua.  c/  Mavor,  35. 
Castellar  del  Vallés.  Teléfono:  (93)  714  89  51. 

• Librería  Michel.  Honda  Guinardo,  1.  Sardañola. 

• Mozart.  c/  Jaime  I,  145.  Mollet. 
teléfono:  (93)  593  75  01. 

• Novo  Digit.  ¿'/Aragón,  472.  Tclf.:  246  27  75 

• Sonimóvil.  c/  Alcalde  Armengou,  53.  Manresa. 
teléfono:  (93)  873  78  17. 

• Tronic.  Bigay,  11-13.  Teléf.:  212  85  96  (93) 

BILBAO 

• llilhomiero  SA.  c/  Aureliano  Valle,  7.  Hilbao-10. 
teléfono:  (94)  443  43  51. 

BURGOS 

• E.l.S.A.  c/  Madrid.  4.  Teléfono:  (947)  20  46  24. 

CADIZ 

• Video  Computer.  Comandante  Gómez  Ortega, 
59.  Algeciras.  Teléfono:  653  902  (956) 

CANARIAS 

• Helax.  Rambla  de  Pulido,  85.  Santa  Cruz  de 
Tenerife.  Teléfono:  (922)  28  37  05. 

CIUDAD  REAL 

• CISA.  c/  D.  Víctor,  15.  Tome-Iluso.  Teléfonos: 
(926)  51  00  07  - 51  15  72. 

• Electrónica  lurrillo.  c/  Pedrera  Baja,  7. 
teléfono:  (926)  22  38  67. 

C ORUNA,  LA 

• Celronic,  S.L.  c/  Palomar,  22  Bajo,  teléfono: 
(981)  27  26  54. 

• Photo  Copy.  c/  Teresa  Herrera,  9.  Teléfono: 
(981)  21  34  21. 

• Sanlusa,  S.L.  San  Luis,  46  al  50.  Teléfono:  (981) 
23  07  49. 

GERONA 

• Digit  Informática,  c/  Avda.  11  Setembre,  7. 
Olot.  teléfono:  (972)  26  94  01. 

• Microchip.  C/Aigua,  3.  Olot.  Teléf.  263  663 

• Regiscompte  SA.  c/  Emilio  Grahil,  17  Bis.  telé- 
fono (972)  21  99  88 


HUELVA 

• Computerlog,  S.A.  c/  Tendaleras,  15.  Teléfono: 
(955)  25  81  99. 

IBIZA 

• Kelson.  Plaza  España,  S/N.  San  Antonio  Abad. 
Teléfono:  (971)  34  13  09. 

LEON 

• MicroBierzo.  c/  Carlos  I,  2. 

Teléfono:  (987)  41  74  21.  (Ponferrada) 

MADRID 

• Chips  v Tips.  c/  Puerto  Rico,  21-23. 

• Librería  García  Peña,  c/  Cavanilles,  52. 

• País  de  los  Microordenadores.  Bravo  Murillo, 
18.  Teléfonos:  (91)  446  33  17  - 446  37  12. 

MALAGA 

• Informática  Martin»  SA.  c/  Cristo  de  la  Epi- 
demia, 90.  Teléfono:  (952)  26  15  60. 

MURCIA 

• Procoinsa.  Ronda  Norte,  27.  teléfono:  (968) 
23  94  49. 

RAMPLONA 

• Microordenadores  Rainar.  c/  Navarro  Villos- 
lada.  7.  Teléfono:  (948)  23  72  80. 

SALAMANCA 

• Compusoft.  c/  Arco,  1.  Teléfono:  (923)  21  59  93. 

SANTANDER 

• Librería  Hernández.  San  Francisco,  15, 
Teléfono:  (942)  22  53  30. 

SANTIAGO  DE  COMPOSTELA 

• GestyComputer.  Avda.  Romero  Donalln,  25. 
teléfono:  (981)  59  87  54. 

SEVILLA 

• Papelería  Mora,  c/  Santa  Cruz,  5.  Ecija 
teléfono:  (954)  83  14  80. 

TARRAGONA 

• Uficomplet.  Plaza  de  la  Cinta,  6.  furiosa.  Telé- 
fono: (977)  44  14  50. 

• Comercial  Informática  de  Tarragona  SA.  calle 
Gasómetro,  20.  Teléfono:  (977)  23  08  53. 

VAUAOOLID 

• Chips  + Tips,  S.  A.  c/  Juan  de  Juni,  3. 
Teléfono:  (983)  33  40  00. 

• Kent  Electrónica  C/Duque  de  la  Victoria,  13. 
tienda,  15.  teléfono:  (983)  47  58  07 

ZARAGOZA 

• ADA  Computer.  Centro  Independencia.  Paseo 
Independencia,  24-26.  teléfono:  (976)  29  85  62. 


TIRADA  D€  COMMODORE  WORLD 
Certificación  de  28.000  ejemplares 

Según  certificado  firmado  por  la  auditoría  internacional  D€lOITT€  HRSKINS  SCLIS,  S.  R. 

el  5 de  marzo  de  1984, 

la  tirada  de  Commodore  UJorld  es  de  28.000  ejemplares. 

€ste  certificado  se  encuentra  en  las  oficinas  de  S.I.M.S.R.  para  comprobación 
de  cualquier  persona  o entidad  que  lo  desee. 
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Commodore  World 
está  publicado  por  SIMSA 
y la  colaboración 
de  todos  nuestros  lectores 

EQUIPO 

Manuel  AMADO;  Nieves  CHESA; 
José  Luis  ERRAZQUIN;  Miguel  A. 
HERMOSELL;  María  LOPEZ;  Juan 
MARQUEZ  Juan  MARTINEZ;  Pere 
MASATS;  Victoria  MORALES; 
Rafael  PARDO;  Diego  ROMERO; 
Albcrt  SANOLAS;  Jordi  SASTRE; 
Valerie  SHANES... 

...Y  NUESTROS  LECTORES 

SIMSA 

Coordinador  María  López 
c/  Barquillo,  21-38.  Izda.  - 28004 
Madrid  Teléf.:  (91)  231  23  85/85 
Delegación  en  Barcelona: 

Sant  Gervasi  de  Cassoles,  39  despacho 
4 Barcelona-22. 
l eí.:  (93)  212  73  45/212  88  48 

Colabora  MKC-COMMODORE 
con  Club  Commodore 
Coordinador  Pere  Masats 
Taquígrafo  Serra,  7-58 
Barcelona-29 
Tels.:  (93)  250  51  03/02 
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PROXIMO  NUMERO: 


• No  te  deshagas  de  tu  VIC  cuando  compras  un  64. 

• Qué  hacer  con  tu  cassette  para  que  entren  esas  cintas  “rebeldes” 

• Disk-O-64 

• Pasaporte  al  mundo 

• Viaje  al  centro  de  tu  Commodore 


Commodore  World  es  miembro  de  CW  Communications/Inc..  el  grupo 
editorial  más  grande  y de  mayor  prestigio  en  el  mundo  en  lo  que  se  refiere  al 
ámbito  informático.  Dicho  grupo  tiene  a su  cargo  la  edición  de  52  publica- 
ciones relacionadas  con  los  ordenadores  en  19  países.  El  grupo  editorial  está 
integrado  por: 

ALEMANIA:  Computerwoche,  Micro  Computcrwelt,  PC'  Welt,  Software 
Markt,  CW  Edition/Semmar,  Computer  Business.  Run  (Commodore). 
ARABIA  SAL'DI:  Saudi  Computcrworld.  ARGENTINA:  Computcrworld/Argentina.  AUSTRALIA: 
Australasian  Computerworld,  Micro  Computer  Maga/ine.  PC  World.  BRASIL:  DataNews.  Micro- 
Mundo.  DINAMARCA:  Computerworld/Danmark,  Micro  Verdcn.  ESPAÑA:  Computerworld/Es- 
paña.  MicroSistemas,  Commodore  World.  ESTADOS  UNIDOS:  Computerworld,  Hot  CoCo,  InCider, 
InfoWorld.  Microcomputing.  PC  World,  80-Micro,  Mae  World  Micro  Markct  Word.  PC  Jr.  World 
Run  (Commodore).  FINLANDIA:  Mikro.  FRANCIA:  Le  Monde  Informatique.  HOLANDA:  Compu- 
terworld Benelux,  Micro/Info.  ITALIA:  Computerworld  Italia.  JAPON:  Computcrworld  Japan,  Perso 
Comworld,  PC  World.  MEXICO:  Computerworld/México,  Compumundo.  NORUEGA:  Computer- 
world Norge,  Mikro  Data.  REINO  UNIDO  DE  GRAN  BRETAÑA:  Computer  Management.  Computer 
Business  Europe.  REPUBLICA  POPULAR  DE  CHINA:  China  Computcrw'orld.  SINGAPUR:  Asian 
Computerworld-  SUECIA:  ComputerSweden.  MikroDalom,  Min  Hemadator. 
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NOSOTROS  MISMOS...  (y  vosotros  como  siempre) 


Tenéis  en  vuestras  manos  el  número 
de  Septiembre,  con  el  verano 
terminado  V de  vuelta  a la  vida 
normal.  Sin  embargo  nosotros  estamos 
escribiendo  estas  líneas  el  30  de  julio, 
con  todo  el  calor  del  mundo  y en  onda 


de  comenzar  vacaciones  en  vez  de 
volver  de  ellas,  seguros  de  que 
tenemos  un  montón  de  cosas  que 
decir,  pero,  con  toda  la  sinceridad  del 
mundo,  nos  sentimos  incapaces  de 
pensar  coherentemente  con  40"  y la 


menta  escapándosenos  continuamente 
al  placer  de  una  buena  piscina. 

Por  lo  tanto,  como  recién  venidos  del 
verano,  tampoco  estáis  con  ganas  de 
mucho  'Tollo”  pasaré  a tres  cosas 
rápidas 


Lo  más  importante  es 
CAMBIO  DE  DOMILICIO 
Hemos  crecido,  y crecido  y nos 
hemos  quedado  pequeños  de  espacio 
c instalaciones.  La  nueva  casa  de 
Barquillo  seguirá  siendo  como  lo  ha 
sido  Pedro  Muguruza,  la  casa  de 
todos  vosotros  y allí  seguimos  todos 
los  mismos. 

Tomad  nota:  ENVIAD  TODAS  LAS 
CON  I'RIBUCIONES, 
PROGRAMAS,  MAGIA,  CARTAS, 
ETC.,  ETC.,  a 

BARQUILLO,  21  - 3» 

28004  MADRID 

Tinos.:  231  23  85  ó 231  23  86 


ADIOS  Y BIENVENIDA 

LAS  AVENTURAS  DE  NUESTROS 

VIAJEROS 

Le  decimos  adiós  a José  López  —Pepe 

Joan  y Diego  están  volviendo  de 

para  nosotros  y los  amigos—  que  se 

Estados  Unidos  en  este  momento  y 

marcha  para  establecerse  por  su 

Juan  Mejuto  se  irá  a Londres  en  un 

cuenta. 

futuro  no  muy  lejano.  En  el  próximo 

Le  deseamos  toda  la  suerte  del 

número  os  contaremos  sus  aventuras 

mundo,  y damos  la  bienvenida  al 

y experiencias  viajeras  y 

equipo,  a Juan  Márqupz 

commodorianas. 

— "Juanito" — . 

__ 

CONCURSOS  PERMANENTES 

Colaboraciones  de  Programas  y Magia 


l.a  verdad  sea  dicha:  os  estáis  portando:  las  colaboraciones  que  nos  están 
llegando  son  numerosas  y de  muy  buena  calidad.  Por  lo  tanto,  vamos  a 
aclarar  las  condiciones  de  nuestros  concursos  permanentes. 

1)  Los  sorteos  se  realizarán  en  los  meses  de  junio  y diciembre. 

2)  Se  sortearán  siempre  seis  premios,  tres  de  15.000,  10.000  y 5.000 
pesetas  en  metálico  de  "Commodore  World”  y tres  del  mismo  valor  en 
material  de  Microelectrónica  y Control,  entre  todas  las  colaboraciones 
publicadas. 

3)  Se  sortearán  siempre  seis  premios,  tres  de  3.000,  2.000  y 1 .000  pesetas 
en  metálico  de  "Commodore  World"  y tres  del  mismo  valor  en  material  de 
Microelectrónica  y Control,  entre  todas  las  contribuciones  publicadas  en  la 
sección  de  “Magia". 

4)  Adicionalmente,  se  sortearán  diversos  premios  de  cintas,  juegos,  etc. 
donados  por  firmas  y distribuciones,  entre  todas  las  colaboraciones. 

5)  Los  autores  de  las  colaboraciones  vendidas  dentro  de  nuestro  "Servicio 
de  Cintas"  percibirán  el  20%  del  precio  de  la  cinta. 

6)  Todas  las  colaboraciones  deben  venir  escritas  a máquina  y los  progra- 
mas grabados  en  cinta  (si  es  posible),  o con  el  listado  completo  en  impresora. 
Nuestros  lectores  más  jóvenes  pueden  escribir  a mano  pero  con  letra  muy 
clara. 

7)  Quedan  automáticamente  descalificadas  tanto  del  sorteo  como  del 


“Servicio  de  Cintas"  las  colaboraciones  que  hayan  sido  enviadas  a otras 
revistas. 

8)  Las  colaboraciones  se  enviarán  a "Commodore  W orld",  C/Barquillo, 
21-3  izda.  28004  Madrid. 


MAS  VIAJES  Y OTRO  REGALO  DE  “IMPRESION”... 
A POR  EL  SUSCRIPTOR  8.000 

Es  evidente  que  a nuestros  sucriptores  les  gusta  viajar.  L)e  momento  Joan 
Pujiula  visitará  los  Estados  Unidos  en  julio  y Juan  Mejuto  Iglesias  irá  a 
Inglaterra  en  el  otoño.  Queríamos  sortear  algo  un  poco  especial  EN  IRE 
TODOS  LOS  SUCRIPTORES  cuando  lleguemos  al  suscriptor  número 
8.000.  y hemos  optado  por  dos  premios,  uno  concedido  por  Microelectró- 
nica v Control  y otro  concedido  por  "Commodore  World". 

MEC  regalará  una  impresora  MPS  801  (o  similar),  y nosotros  hemos 
escogido  un  surtido  de  viajes  muy  "chulos"  para  dos  personas  para  que  el 
ganador  elija  el  que  más  le  apetezca.  La  selección  que  hemos  hecho  es  la 
siguiente: 

V iajes  de  4 dias  en  hoteles  de  primera  clase  a uno  de  estos  lugares: 

París,  Lisboa,  Atenas,  Amsterdam,  Niza,  Viena. 

O viajes  de  una  semana  en  hoteles  de  4/5  estrellas: 

Canarias  o Mallorca. 
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Convocatoria  del  Primor  Concurso 
Nacional  Escolar  do  Programación 
patrocinado  por  Commodore  World  y 
Microelectrónica  y Control 


BASES 

1“  Podrán  participar  en  el  mismo  todos  aquellos  niños  y jóve- 
nes que  estén  en  edad  escolar  pre-umversitaria  o 
equivalente. 

2®  Habrá  tres  grupos  definidos: 

a)  E.G.B. 

b)  B.U.P. 

c)  F.P. 

3®  Los  irabajos  pueden  ser  presentados  por  equipos  o por 
individuales. 

4®  Los  trabajos  presentados  por  equipos  deben  especificar: 

a)  Nombre  del  equipo. 

b)  Centro  al  que  representan. 

c)  Nivel  de  enseñanza  que  cursan  (E.G.B.-B.U.P-F.P.). 

d)  Nombre  del  profesor,  monitor  o coordinador. 

5®  Los  trabajos  presentados  por  individuales  deben  ir  acom- 
pañados de: 

a)  Nombre  del  autor. 

b)  Edad  y curso  que  estudia. 

c) (¡)  Si  concursa  representando  a un  centro:  nombre  del 
mismo  y nombre  del  profesor  responsable. 

(¡i)  Si  concursa  por  si  mismo:  nombre  del  colegio  donde 
estudia  y firma  del  director  o profesor  responsable  ava- 
lando que  en  tanto  cuanto  conoce  al  concursante  el  trabajo 
que  presenta  es  suyo  propio. 


6®  El  lema  del  concurso  es  la  realización  de  un  programa  edu- 
cativo sobre  materia  libre  a elegir  por  los  concursantes.  La 
extensión  del  programa  es  también  de  libre  elección. 

7“  Cada  centro  puede  presentar  el  número  de  equipos  o con- 
cursantes individuales  que  desee,  siempre  que  cada  trabajo 
sea  enviado  por  separado. 

8°  Los  trabajos  deben  incluir: 

a)  Nombre  el  programa. 

b)  Nombre  del  computador  para  el  que  está  confeccio- 
nado y periféricos  adicionales  que  se  necesitan  (si  fuese  el 
caso). 

c)  Objetivo  del  programa. 

d)  Explicación  detallada  del  programa  (a  máquina  o 
impresora). 

e)  Listado  completo  a impresora. 

0 Grabación  en  cinta  o disco. 

9°  Todos  los  trabajos  presentados  deben  ser  originales  e 
inéditos. 

10®  Los  centros  que  pueden  presentar  equipos  o concursantes 
individuales  son: 

a)  Todo  colegio,  escuela  o instituto,  público  o privado 
que  imparta  las  enseñanzas  de  E.G.B.,  B.U.P,  o F.P 

b)  Centros  de  Informática  que  tengan  grupos  de  ense- 
ñanza especifica  para  niños  y jóvenes  menores  de  18  años. 

c)  Clubs  de  informática  que  mantengan  actividades  espe- 
cíficas para  niños  y jóvenes  menores  de  18  años. 

1 11’  Los  trabajos  deben  ser  enviados  antes  del  31  de  diciembre  de 
1984. 

12°  El  fallo  del  concurso  se  dará  a conocer  en  la  primera 
semana  de  marzo  de  1985  en  el  lugar,  fecha  y hora  que  se 

indicarán 

13°  Los  trabajos  premiados  quedarán  propiedad  de  los 
patrocinadores. 

Ver  más  abajo  lugar,  fecha  y hora  de  la  presentación  oficial  y 

anuncio  de  los  premios. 


Convocatoria  del  primor  concurso  nacional 
do  programación  en  80  columnas  do 
Commodora-64  y 40-80  columnas  del 
VIC-20  patrocinado  por  Forro-Moret,  S .A. 
Con  la  colaboración  de  Commodore- 
World,  más  de  500.000  ptas.  en  premios 

BASES 

I"  Podrán  participar  todos  los  usuarios  de  COMMODORE- 
64  y VIC-20  que  hayan  obtenido  la  tarjeta  de  80  columnas 
de  FERRE-MORET,  S.A. 

2“  Cada  concursante  podrá  presentar,  un  programa  realizado 
por  él  o por  un  equipo  del  que  deberán  indicar  un  titular. 

3“  Se  enviará  la  explicación  detallada  del  programa  redactado 
en  español,  escrito  a máquina.  El  programa  se  enviará  en 
cassette  o disco,  adjuntando  su  correspondiente  listado  del 
programa. 

4"  Se  enviarán  por  correo  certificado  a la  siguiente  dirección, 
FERRE-MORET,  S.A.  calle  Buenos  Aires  n®  30,  2°-3.a  de 
BARCELONA-36.  Antes  del  31  de  enero  de  1985. 

5°  Los  programas  no  premiados  podrán  ser  solicitados  por  sus 
propietarios  en  el  plazo  de  treinta  dias  después  del  fallo. 

6“  El  resultado  se  comunicará,  directamente  a los  ganadores 
y se  publicará  en  la  revista  COMMODORE  WORLD. 


7®  Los  premios  se  entregarán  durante  la  primera  semana  de 
marzo  de  1985  coincidiendo  con  la  entrega  de  premios  del 
PRIMER  CONCURSO  NACIONAL  ESCOLAR  DI 
PROGRAMACION 

8°  Los  programas  premiados  quedarán  en  propiedad  de 
FERRE-MORET,  S.A. 

9®  Los  programas  que  no  obtengan  premio,  recibirán,  en  caso 
que  asi  lo  considere  FERRE-MORET,  S.A,,  ofertas  de 
compra  de  sus  programas. 

10“  Los  premios  ascenderán  a 500.000  Ptas.  repartidos  de  la 
siguiente  manera: 

1“  250.000  Ptas. 

2®  150.000  Ptas. 

3®  100.000  Ptas. 

II®  Todos  los  participantes,  que  no  hayan  recibido  premio  u 
oferta  de  compra,  podrán  participar  en  el  concurso  de  cola- 
boradores que  habitualmente  COMMODORE  WORLD 
viene  realizando  con  un  premio  extra  de  FF.RRE-MORET, 
S.A.,  de  50 .(KM)  Ptas. 

12®  Los  trabajos  deberán  de  ser  inéditos  y desarrollar  temas  de 
utilidad,  programas  profesionales,  científicos,  educativos, 
etcétera. 

FERRE-MORET.  S.A.  se  reserva  el  derecho  de  modificar  las 
bases  de  este  certamen,  dejarlo  desierto  o suprimirlo,  por  causa 
de  fuerza  mayor.  En  este  caso  la  empresa  se  compromete  a 
comunicarlo  a través  de  COMMODORE  WORLD. 


La  presentación  oficial  del  1 er  Congreso  Nacional  Escolar  Escolar  de  Programación  tendrá 
lugar  en  la  sede  de  la  FUNDACION. 

ORTEGA  Y GASSET  - Calle  Fortuny,  53,  de  Madrid,  el  día  20  de  Septiembre,  jueves  a las 
7,30  de  la  tarde. 
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Clave  para  interpretar  los  listados 


Todos  los  listados  que  se  publican  en 
esta  Revista  han  sido  ejecutados  en  el 
modelo  correspondiente  de  la  gama 
de  ordenadores  COMMODORE.  Para  faci- 
litar la  edición  de  los  mismos  en  la  Revista 
y para  mejorar  su  legibilidad  por  parte  del 
usuario,  se  les  ha  sometido  a ciertas  modifi- 
caciones mediante  un  programa  escrito 
especialmente  para  ello.  Para  los  progra- 
mas destinados  a los  ordenadores  VIC-20  y 
COMMODORE  64,  en  los  que  se  usan  fre- 
cuentemente las  posibilidades  gráficas  del 
teclado,  se  han  sustituido  los  símbolos  grá- 
ficos que  aparecen  normalmente  en  los  lis- 
tados por  una  serie  de  letras  entre  corchetes 
[]  que  indican  la  secuencia  de  teclas  que  se 
deben  pulsar  para  obtener  el  carácter 
deseado.  A continuación  se  da  una  tabla 


para  aclarar  la  interpretación  de  las  indica- 
ciones entre  corchetes: 

[CRSRD]  = Tecla  cursor  hacia  abajo  (sin 
SHIFT) 

[CRSRU]  = Tecla  cursor  hacia  arriba  con 
SHIFT) 

[CRSRR]  = Tecla  cursor  a la  derecha  (sin 
SHIFT) 

[CRSRL]  = Tecla  cursor  a la  izquierda  (con 
SHIFT) 

[HOME]  = Tecla  CLR/HOME  (sin  SHIFT) 
[CLR]  = Tecla  CLR/HOME  (con  SHIFT) 

Las  indicaciones  [BLK)  a [YEL]  corres- 
ponden a la  pulsación  de  las  teclas  de  1 a 8 
junto  a la  tecla  CTRL.  Lo  mismo  sucede 


con  [RVSON]  y [ RVSOF]  respecto  a la  tecla 
CTRL  y las  teclas  9 y 10. 

El  resto  de  las  indicaciones  constan  de  la 
parte  COMM  o SHIF  seguidas  de  una 
letra,  número  o símbolo  — por  ejemplo 
[COMM+]  o [SHIFA] — . Esto  indica  que 
para  obtener  el  gráfico  necesario  en  el  pro- 
grama deben  pulsarse  simultáneamente  las 
teclas  COMMODORE  (la  que  lleva  el  logo- 
tipo) o una  de  SHIFT  y la  tecla  indicada 
por  la  letra,  el  número  o el  símbolo,  en  el 
ejemplo  anterior:  COMMODORE  y + o 
SHIFT  y A,  respectivamente. 

En  los  signos'grá fíeos  además  se  cuenta 
el  número  de  veces  que  aparece.  Por  ejem- 
plo, [7  CRSRR]  equivale  a 7 pulsaciones  de 
la  tecla  cursor  a la  derecha  y [3  SPC]  tres 
pulsaciones  de  la  barra  espadadora.  ■ 


METEDURAS  DE  PATA 


• En  el  número  5,  en  el  programa  "MAT+DET",  apareció  varias 
veces  el  error  entre  corchetes  “[ERROR]”,  todas  las  veces  debía 
aparecer  la  clave  de  las  teclas  Commodore  y 7 “[COMM7J. 

• En  el  número  6,  en  las  lineas  ISO,  550,  560.  2000,  2020,  2030,  y 
2040,  se  cambió  |COMM4]  POR  [ERROR|.  y en  la  línea  590  debió 
ser  [COMM7J. 

• El  programa  "Tragaperras",  indicaba  que  era  para  el  C-64,  debía 
decir  VIC-20. 

• El  programa  "Boggle",  lo  probamos  con  uno  de  los  nuevos  C-64  con 
la  ROM  versión  3,  y funcionó  correctamente,  pero  para  que  el  cuadro 
de  puntos  y letras  aparezca  en  la  parte  izquierda  de  la  pantalla  en  los 
antiguos  C-64,  deben  cambiarse  las  siguientes  lineas: 

30  EOR  T=ITOI():POKE  A,46:POKF  A+54272,I:A=A+1:NEXT  T 
70  EOR  T ITOIO:POKE  A.46:POKE  A+54272,1:A=A+2:NEXT  T 
130  POKE  A.GiPOKE  A+54272,l:A=A:Q(E)=G 

• El  programa  que  apareció  en  la  pág.  44  del  nv  5 que  no  era  lo 

suficiente  legible  en  la  impresión.  . 


0 pem  Mmwm+M****  avie  m 

EMGR 1 m * < 0 > A . S . V . 1 984 * 

rWMM******** 

1 0 DAT  H 1 62  ■ , 1. 60 , 32 , 24 , 32 , 1 56  .•  255 , 1 69 
. 32 ..  J.  41,1 30  , 2 , 1 69 , 240  • 1 4 1 5 • 1 44 , 1 73  • 
2, 144,9. 128, 141 

1 1 DAT  A2 , 1-  4 ,1 69 , 30 . 1 4 1 , 1 36 , 2 . 1 69 , 1 
8 ,141,1 38 , 2 1 69 , 8 , 1 41,1 5 , 1 44 , 1 69  • 1 
41, 134,2,32, 120 

12  DAT R227 , 96 

u FOP  1 = 1 0000TÜ 1 0049 : RE  ADA  : POKE  I , A ■ N 
EXT  SVS 10000 


INDICE  DE  ANUNCIANTES 
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Brother  23 

EAF  26 
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Commodore  42-43 
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Tele  Sant  Just  45 

Register  lately  Continental 47 
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Serpro  52 

Kent  Electrónica  53 

Centro  de  Informática  54 

Deltabil  55 

NDS 59 

Astoc-Data  60 

Indescomp  67 
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QUINIELAS 

CALCULO 
GENERADOR  CON 
CONDICIONANTES 
FIJADOS  DE 
ANTEMANO  (FIJOS 
DOBLES,  TRIPLESI 
EN  DISCO  Y CINTA 


°00^ 


5°°OpT^ 


RECTAS  DE 
REGRESION 

POR  PANTALLA  E 
IMPRESORA  MEDIA 
DESVIACION  TIPICA 
Y VARIAN2A 
PREDICCIONES 


5-000^: 


°°Opts. 


CONTROL  STOK 
MOVIMIENTOS  DE  ALMACEN 
OIAMOS  DE  VENTAS  V 
COMPRAS  INVENTARIO 
MINIMOS 

LISTADOS  DIVERSOS 
ARTICULOS  1500 
^PROVEEDORES  255 


°°0p£ 


DIRECCIONES  Y 
ETIQUETAS 

DIRECCIONES 
ETIQUETAS 
GESTIONES  DIARIAS 
Y OTROS  PROCESOS 


s.üoop^; 


GESTION 


COMERCIAL 

MOVIMIENTOS  DE  ALMACEN 
AlBARANES  FACTURAS 
RECIBOS  REMESAS 
V OTROS  LISTADOS 
CLIENTES  500 


ARTICULOS  1000 


algunos  de  nuestros  programas  para  los 
ordenadores  personales 
C‘  commodore 
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AVD.  CESAR  AUGUSTO, 72 
Tlfs.23  56  82  y 22  6544 
ZARAGOZA  3 


AGENDA  Y 
DIRECCIONES 

ENTRADA  DIARIA  CON 
OCUPACION  DINAMICA 
VISUAUZACION  E IMPRESION 
DE  GESTIONES  AGENOA 
DIRECCIONES 
^LISTADOS  V ETIQUETAS 


iNOVEDADI 

FICHAS  COMERCIALES 
INFORMES 
LISTADO  INFORMES 
ETIQUETAS 
LISTAOOS  VARIOS 
CLIENTES  235 
INFORMES  2000 


iNOVEDADI 
EFECTOS  Y REMESAS 

EMISION  RECIBOS 
EMISION  REMESAS 
ETIQUETAS  CLIENTES 
LISTADOS 

CLIENTES  800 
REMESAS  500 


INOVEDADI  O 

‘■'etíÓuetas 

direcciones 

PRECIOS 
EMBALAJES 
OTROS  PROCESOS 


CONTABILIDAD 


DIARIO  BALANCES 
SUMAS,  SALDOS  Y 
SITUACION 
LISTADOS  APUNTES 
CUENTAS  750 
APUNTES  3515 


RECIBOS  DE 
CUOTAS 


MANTENIMIENTO 
LISTADO  DE  RECIBOS 
LISTADO  ETIQUETAS 
Y OTROS 


MANTENIMIENTO' 
LISTADOS 
PANTALLA  IMPRE. 
CLAVE  10 
TEXTO  14  LINEAS 
POR  36  CARACT 
200  REGISTROS 


APRENDE  INGLES 
CON  EL  MONO  MARCHOSO 

Este  programa  ayuda  a los  “peques”  — “papis”  y “profes” 
también — a escribir  en  inglés. 

El  uso  obligatorio  del  diccionario  os  acostumbrará  a su  manejo,  y, 
a la  vez,  lo  pasaréis  muy  bien  jugando  con  el  mono. 


^ §8 


A lo  largo  de!  artículo  aparecen  unas  pantallas  mostrando  el  texto  real  que  aparece  en  pantalla  y su 
traducción  en  español.  P 


El  objetivo  de  este  juego  no  es  el 
simple  recordatorio  visual  de  un 
número  determinado  de  palabras 
inglesas;  su  finalidad  es  el  aprendizaje  de 
tantas  palabras  inglesas  como  quieras 
usando  el  diccionario. 

La  utilización  del  diccionario  es  indis- 
pensable, tanto  para  las  palabras  que 
escribe  el  mono  como  para  las  que  escri- 
bes tú,  ya  que  el  programa  no  sabe  com- 
probar su  validez. 

Al  mono  se  le  puede  engañar  fácil- 
mente — de  hecho,  siempre  que  se 
quiera — pero  en  venganza,  tú  no  apren- 
derás ningún  inglés  y te  aburrirás  “como 
un  mono",  ganándole  todo  el  tiempo 
porque  si. 

¿El  mono  te  está  engañando, 
o realmente  sabe  inglés? 

Busca  en  tu  diccionario, 
y escribe  las  palabras  que  ves. 

Después  de  cargar  el  programa,  apa- 
rece en  pantalla  este  “poema".  En  el 
tiempo  que  tardas  en  leerlo,  el  ordenador 
diseña  los  caracteres  personalizados  del 
juego  y los  almacena  en  memoria.  La 
pantalla  cambia,  y empieza  el  juego. 

La  cara  del  mono  aparece  en  la  esquina 
superior  izquierda  de  la  pantalla.  “Funky 
Monkey  Spells..."  (El  Mono  Marchoso 
Escribe...”)  aparece  a la  derecha  del 
mono.  Debajo  de  este  mensaje  aparecen 
tres  caracteres  subrayados  en  rojo. 

El  ordenador  te  pregunta  si  el  mono 
escribió  una  palabra  correcta  (Did  Funky 
spell  a real  word?)  y le  indica  que  pulses  la 
tecla  Y para  SI  y N para  NO  (Press  Y or 
N)  comprobando  en  tu  diccionario  antes 
de  contestar. 

Si  el  Mono  Marchoso  escribe  una  pala- 
bra que  existe,  él  gana  un  plátano.  Si  el 


VIC-20 


Mono  no  escribe  una  palabra  correcta,  y 
tu  pulsas  N,  el  ordenador  te  pregunta  si 
puedes  formar  una  palabra  que  contenga 
esas  letras.  Usa  tu  diccionario  de  inglés 
para  encontrar  una  palabra  correcta  y 
forma  una  palabra  cambiando  el  orden  de 
las  letras  o añadiendo  unos  caracteres 
nuevos  (la  palabra  puede  ser  de  tres  letras 
o ser  tan  larga  como  tú  quieras),  pulsando 
a continuación  la  tecla  Y.  El  ordenador  te 
indica  que  teclees  la  palabra  y que  pulses 
la  tecla  Retum. 

A continuación,  el  ordenador  te  pide 
que  compruebes  si  la  palabra  es  correcta 
o no  — es  decir,  que  contenga  las  tres 
primeras  letras  que  te  dio  el  mono — y que 
la  palabra  existe.  Si  te  equivocaste  o la 
palabra  no  existe,  debes  pulsar  N y el 
Mono  Marchoso  gana  el  plátano.  Pero  si 


es  correcta  y pulsas  Y,  tú  ganas  el  plá- 
tano. A continuación,  se  presenta  la  pun- 
tuación, que  lleva  la  cuenta  de  los  pláta- 
nos que  tú  te  has  ganado  y los  plátanos 
que  se  lleva  el  mono.  El  primero  que  lle- 
gue a diez  plátanos  gana  el  juego.  Si  quie- 
res volver  a jugar  (el  ordenador  te  lo  pre- 
guntará), pulsa  la  tecla  RUN  y pulsa  la 
tecla  Return. 

Repetimos  que  para  que  este  juego 
resulte  realmente  educativo  e intere- 
sante — ¡Porque  si  no  es  aburridísimo! — 
exige  el  uso  de  un  diccionario.  Aprove- 
chando el  interés  de!  niño,  sería  buena 
idea  que  este  apuntara  las  palabras 
nuevas  encontradas  en  el  diccionario  y 
que  buscara  la  traducción  de  inglés  a I 
español.  Así  que,  adelante  y "Good 
Luck !"  ■ 
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10  PRINT" " 

20  REM  FIJNKV  MOHKEV 
30  POKE36869,240 

40  F'RI  NTCHR*  < 1 47 )CHR* < 28)TAB<53)  " XXX 
X 

50  PRINTCHRfOl  >TAB<24) "EL[2SPC]M0N0 
[ 2SPC ] TE [ 2SPC ] ESTA [ SPC ] C 2SPC ] [ CRSRD I 
[ SPC ] ENGAN C CRSRU 1 C CRSRL ] C SH I FTP ] [ CRSRD I 
ANDO?" 

60  PR I NTTflB  < 24  > " 0 C 2SPC 3 REALMENTE [ 2 SPC 3 
SABE [ 4SPC 3 C CRSRD  3 1 NGLES? " 

70  PR I NTTAB  <24 > " BUSCA C 4 SPC 3 EN [ 4 SPC 3 T 
U [ 5SPC 3 [ CRSRD  3 D I CC I ONAR I O , " 

80  PR I NT " [ CRSRD  3 C 2SPC  3 V C 3SPC 3 ESCR 1 BE 
C 3SPC  3 LAS [ 4SPC 3 C CRSRD 3 C SPC  3 PALABRAS  C SPC 3 
QUE [SPC 3 VES. " 

90  PRI NTCHR* <28)TAB< 31 ) "XXXX 

100  FORT  = 1 TO2000 ; NEXT 

1 1 0 P0KE52  , 28  ¡ P0KE56 , 28 : CLR 

120  F0RI=7168T07679  POKEI ,PEEK< 1+256 

00 ) : NEXT 

130  REABA: IFAC0THEN340 

140  F0RC-AT0A+7 : READJ  POKEC, J : NEXT 

150  GOTO  130 

160  DATA7512, 0,0, 0,0,0, 1, 10,22 
1 70  DATA7528 ,0,31, 32 ,64,128,0,0,1 
180  DATA7392 , 0, 128,64,32,32,32,64,  12 
8 

190  DATA71 68, 18, 18, 18, 19, 11,7,3, 15 
200  DATA7504, 31, 127,255,255,221,8,0, 

0 

210  DATA7408, 0, 128, 192, 192, 192, 192, 1 
28.224 

220  DRTA7384, 18,34,34,35, 19, 18, 10,6 
230  DATA7400 . 102, 102,127,129,20,20,0 
,0 

240  DATA7656 ,144.144,136,136,144,80, 

96,64 

250  DAT A 7648 ,2,2,2, 1,1, 0,0,0 

260  BATA7664, 129,66,60,24,1,194,60,0 

270  DATA7544 , 64 . 64 , 64, 128,0.0,0.0 
280  DATA74 1 6 , 255 , 255 , 255 , 255 , 255 , 255 


FUNKV  MO.NKEV  SPF.I.LS  ... 

EL  MONO  MARCHOSO  ESCRIBE.. 

FUNKV  HAS 

YOU  HAVE 

FUNKV  TIENE 

TU  TIENES 

IST  SCORE  OF  10  WINS 

EL  PRIMERO  QUE  LLEGUE  A DIEZ,  GANA. 

,255,255 

290  DAT A7488 , 255 ,255,0,0,0 , 0 ,0,0 
300  DAT A7448 ,32,112. 63 , 3 1,31,15,15,7 

3 1 0 BATA7456 ,0,0, 255 . 255 , 255 , 255 , 255 
,255 

320  DAT A7464 , 0 , 0 . 252 , 254 , 254 , 252 , 248 
,240 

330  DATA-1 

340  P= 1 000  FS-0 : VS=0 : P0KE36869 , 255 
350  PR  I NTCHR*  <147  > CHR# < 28  > "♦++++«•" 

360  FORT=  1 T06 ; PR  I NT  " +•"  SPC  < 5 > " NEXT 

370  PRINT"*  <■+■<  * " 

380  C$= " +-£ [ CRSRD ] [ 3CRSRL J 0* tt CRSRD ] 

C 3CRSRL ] [ ] = C CRSRD I [ 3CRSRL ] <>/ " 

390  PR I NTCHR* < 19 >CHR*  < 1 44 ) TAB  < 46  > C* 

400  PR I NTCHR* < 1 9 ) TAB < 52 ) ” FUNKV  t SPC  ]M 
ONKEV" 

410  F0RT=1TÜP  NEXT 

420  PRINTTAB<9) "SPELLS. . . " FÜRT=1TÜP 
NEXT 

436  GOSUB660 

440  PR I NTCHR*  < 1 9 ) CHR*  < 3 1) TAB < 1 22 ) CHR 

*<c>; 

450  GOSUB660 

460  IFC=650PC=690RC=730RC=790RC=85TH 

EN480 

470  GOTO450 

480  PR I NTCHR*  < 1 9 ) TAB  < 1 23  > CHR*  < C > , 

490  GOSUB660 

500  PR I NTCHR*  < 1 9 > TAB < 1 24  >CHR* < C > 

510  PR I NTCHR*  < 1 9 ) CHR*  < 28) TAB < 144) ” < < 

<M 

520  PR I NTCHR*  < 1 9 ) CHR* < 1 44 ) TAB < 255 > TA 
B<155>; 

530  PRINT" FUNKV [ SPC I HAS [ 3SPC ] VOU [ SPC ] 

HRVE" 

540  PR I NTCHR#  < 1 7 ) FSCHR*  <158) " #*X " CHR 
*<144)“'S"; 

550  PRINTSPC<4) VSCHR#< 158) "#*X"CHR*< 
144)“'S 

I 
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APRENDA  INGLES  CON  EL  MONO  MARCHOSO 


360  PR I NTCHR#  (.17)  CHR*  < 1 44 > CHR*  < 29  > " 1 
ST [ SPC ] SCÜRE  C SPC ] OF [ SPC 3 1 9 C SPC 3WINS" 

570  PRI NTCHR* (145) 

580  PR I NTCHR* < 1 9) CHR* < 3 1 )TfiB  < 244 > ; 

590  PR I NT " H I D [ SPC ] FUNKV C SPC 3 SPELL  C SPC ] 
fl C 5SPC 3 REAL [ SPC ] WORD? " 

600  PR I NTTRB  < 24  > CHR*  < 30  > " PRESS [ SPC  3 V 
[ SPC 3 ORE SPC 3 N" 

610  GETG* : IFG*=" "THEN610 
620  I FG*= " N " THEN680 
630  IFG**"V"THEN740  GOTO610 
640  GETG*; IFG*=" "THEN640 
650  GOTO430 

660  C= I NT ( RND < . ) #26 ) +65 : RETURN 
670  FORT= 1 TOP  NEXT : RETURN 
680  GOSUB870 

690  PR I NTCHR*  < 1 9 ) CHR* < 3 1 > TflB  < 243  > ; 

700  PR I NT " CñN [ SPC  3 VOU  C SPC  3 MfiKE [ SPC  3 R 
C SPC  3 RERL [ 3SPC 3 WORD C SPC  3 OUT C SPC 3 OF  C SPC 3 
FUNKV 'S?" 

710  GETG*  IFG*=" "THEN710 
720  I F 0*0  " V " RNDG*0 " N " THEN7 1 0 
730  I FG*= " V " THEN880 
740  GOSUB870 

750  FS*FS+1 : PRINTTfiBÍ 198)CHR*< 144)FS 

760  IFFS*10THEN1070 

770  PR  I NTCHR* < 1 9 ) CHR*  < 3 1 > TRB < 244  ) 

780  PR I NT "THEN [ SPC  3 FUNKV [ SPC 3GETSC SPC  3 
RC5SPC3BRNRNR ! " 

790  P=2000  ■ GO5IJB670 
800  GOSUB870 

810  PR I NTCHR#  < 1 9 > CHR* < 3 1 ) TRB < 244 ) ; 

820  PR  I NT " RRE C SPC  3 VOU C SPC  3 RERDV  C SPC 3 
FÜR [ 5SPC 3RNÜTHERC  SPC 3 WORD? " 

830  GETG#: IFG*=" "THEN830 

840  I FG*<> " N " RNDG*<> " V " THEN830 

850  IFG*="N"THEN830 

860  I FG*=  "V" THENF'=500  • GOTO350 

870  PRI NTCHR#C 19) TRB <242);  F0PI=1T04 

4 PR I NT " [ SPC  3 " ; : NEXT  RETURN 

880  GOSUB870 
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ARE  VOU  READV  FOR  ANOTHER  WORD? 
¿QUIERES  OTRA  PALABRA? 


890  PR I NTCHR*  <1 9 ) CHR*  < 30 ) TRB  < 248 ) TRB 
(68) " PRESS t SPC 3 RETURN" 

900  PR I NTCHR*  < 1 9 > CHR# < 3 1 ) TRB < 244 > 

910  I NPUT " TVPE [ SPC  3 WORD " - fi* 

920  GOSUB870 

930  PR I NTCHR# <1 9 ) TRB < 244 ) TRB < 68 ) CHR* 

■30 ) " PRESS  C SPC  3 V C SPC  3 OR [ SPC  3 N " 

940  PR I NTCHR#  <19 ) CHR*  < 3 1 ) TflBí  244 ) " I S 
C SPC  3 "fi# " C SPC  3 R I GHT'7  " 

950  GETG*  1 FG*= " " THEN950 
960  IFG#O"V"RNDG*O"N"THEN950 
970  I FG#* " N " THEN740 
980  GOSUB870 

990  VS=VS+1 : PRINTTRB(210)CHR*< 144 )VS 

1000  GOSUB870 

1010  I FVS* 1 0THEN 1 050 

1020  PRI NTCHR* < 19)CHR*< 31 )TRB<244>"V 

OU [ SPC  3GETC SPC  3 R [ SPC  3 BRNRNR ! " 

1030  P=2000 : GOSUB670 
1040  GOTO800 

1 050  PR I NTCHR* <19) CHR# < 3 1) TRB < 248 ) " V 
0UCSPC3WIN ! " 

1060  GOTO 1100 
1070  GOSUB870 

1 080  PR I NTCHR* (19) CHR# < 3 1 ) TflB < 246 ) "F 
UNKVCSPC3WINS ! " 

1090  GOTO 1100 

1 1 Ó0  PR I NTCHR* < 1 44 ) : FORJ* 1 TO 1 2 

1110  PRI NTCHR* < 1 9 ) TRB < 46 ) " C 3SPC 3 " TRB 

< 24 ) " [ 3SPC 3 " TRB  < 24 ) " [ 3SPC 3 " i 

1120  PR I NTTRB  < 24 ) " C 3SPC 3 " TRB < 24 ) " C 3SPC 3 

1130  PRI NTCHR* < 19)TRB<24)C*  FORT=lTO 
150  NEXT 

1140  PRI NTCHR* < 1 9 ) TRB < 24 ) " [ 3SPC 3 " TRB 
<24) " C3SPC3 " ; 

1150  PRI NTCHR* < 1 9 ) TRB < 24 > " [ 3SPC 3 " TRB 
<24) " C3SPC3 " 

1 1 60  PR I NTCHR*  < 19 ) TflB  < 46 ) C * FORT = 1 TO 
150  NEXT : NEXT 
1170  GOTO 1170 


casa  de 
software  sa. 


PARA 

COMMODORE  64 


PRACTICALO  64 


PROCESADOR  DE  TEXTO 


VIZAWRITE  64 


< 


35.000  caracteres,  240  columnas 
Versión  diskette:  21.500,— 
Versión  cartucho:  24.900,— 
(grabación  de  documentos  en 
diskette  y cassette) 


> 


MANUAL  EN  CASTELLANO 


HOJA  DE  CALCULO' 

2.000  coordenadas 

(funciones  matemáticas,  sort,  gráficos...) 
Versión  cassette  C-64:  15.500,— 

Versión  diskette  C-64:  17.500,— 

Versión  cassette  VIC-20:  1 1.500- 
Versión  diskette  VIC-20:  13.500,- 


MANUAL  EN  CASTELLANO 


CONTABILIDAD  64 
PROFESIONAL 


VERSION:  A 
300  cuentas 


3.000  apuntes 


VERSION:  B 
600  cuentas 
2.300  apuntes 

• Listado  de  diario 

• Balance  de  situación  y de  Sumas  y Saldos 

• Estrados  de  cuenta 

• Cuenta  de  explotación,  diario  de  cierre 

• Mantenimiento  de  ficheros,  utilitario... 

EQUIPO  NECESARIO: 

• COMMODORE  64  y unidad  de  disco 

• IMPRESORA  MPS  801  (versión  A y B) 

• IMPRESORAS  CENTRONICS  (versión  B) 


pvp  VERSION  A:  24.550,- 
VERSION  B:  29.500- 


ADAPTADO  AL  PLAN  GENERAL  CONTABLE  ESPAÑOL 


PROGRAMAS  EN 
CARTUCHO  + DISKETTE 


< 


VIDEOCLUBS  64 


1.800  videofilms 
650  clientes  por  disco 
Saldo  de  cada  cliente 
Altas  y bajas  videofilms 
Búsqueda  videofilms/clientes. 


P.V.P.:  35.000,- 


ADMINISTR  ACION 
DE  FINCAS 


6.000,- 

3.500, - 

2.500, - 

4.000, - 

3.000, - 

30  inmuebles 

400  inquilinos 

Listado  recibos 

Propiedad  vertical 

Comunidades  de  propietarios 

P.V.P.:  35.000,- 

^ r 

1.900- 

LAPIZ  OPTICO  Y 

3.000,- 

SOFTWARE  GRAFICO 

3.000,- 

P.V.P.:  12.500,- 

3.000,- 

3.000,- 

r ' 

JOY  STICK  DE 
PRECISION 

3.000- 

P.V.P.  2.950- 

< 


< 


< 


casa  de  software,  s.a. 

c/.  aragón,  272, 8.°,  6.a 
tel.  215  69  52 
08007  barcelona 


COMODORE  64  ES  UNA  MARCA  REG.  DE  COMMODORE  BUSSINES  MACHINES,  INC. 


ES  LA  “HORA”  DE  APRENDER 


Este  programa  sirve  para  enseñar  la  hora  a los  niños. 

El  objeto  de  este  juego  educativo  es  de  parar  las  manos  del  reloj 
para  que  coincidan  con  la  hora  indicada  en  pantalla. 


VIC-20 

NO  AMPLIADO 
C-64 


La  mejor  forma  de  utilizar  las  teclas  de 
funciones  es  pulsarlas  después  de  cada 
"tick-tock"  para  evitar  cualquier  sallo 
inesperado. 

También  ayuda  colocar  la  manilla  que 
indica  la  hora  justo  antes  de  la  hora 
anunciada.  Asi  se  puede  utilizar  la  mani- 
lla de  los  minutos  para  acercarse  aún  más. 

Es  aconsejable  dejar  que  el  reloj  se 
coloque  automáticamente  en  la  posición 
final.  Se  presenta  la  tecla  F7  como  la  que 
se  utiliza  para  iniciar  y parar  el  movi- 
miento del  reloj  pero,  de  hecho,  la  tecla 
F5  o cualquier  otra  tecla  normal  funciona 
igual  de  bien. 

Cada  vez  que  se  presenta  el  reloj  en 
pantalla,  una  hora  generada  al  azar  apa- 
rece en  la  esquina  superior.  Hay  tres  nive- 


Profesores  y padres  pueden  utilizar 
este  programa  para  enseñar  la  hora 
a los  niños.  Se  presenta  en  forma 
de  juego,  el  niño  gana  si  logra  parar  las 
manillas  del  reloj  tres  veces  en  la  hora 
indicada.  El  programa  fue  escrito  para  el 
V1C  no  ampliado;  también  se  incluye  la 
versión  para  el  C-64. 

El  programa  empieza  con  un  diagrama 
de  un  reloj  que  muestra  cómo  los  núme- 
ros de  la  hora  corresponden  a intervalos 
de  cinco  minutos.  Este  diagrama  se  pre- 
senta en  pantalla  si  el  niño  falla  tres  veces 
consecutivas. 

Además,  esta  pantalla  le  pregunta  al 
niño  si  necesita  instrucciones.  Si  no  son 
necesarias,  se  generan  unas  horas  al  azar 
bajo  las  mismas  condiciones  de  dificultad 
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elegidas  al  principio.  Si  el  niño  prescinde 
de  instrucciones  y nivel  de  dificultad,  se 
elige  automáticamente  el  nivel  más 
sencillo. 

Las  instrucciones  son  muy  sencillas.  Se 
trata  de  intentar  parar  el  reloj  cuando  las 
manillas  coincidan  con  la  hora  en  panta- 
lla. El  jugador  gana  cuando  acierta  tres 
veces.  Las  manillas  del  reloj  se  mueven 
automáticamente.  Pueden  ser  avanzadas 
mediante  el  uso  de  dos  de  las  teclas  de 
funciones:  la  tecla  F1  hace  que  la  manilla 
que  indica  la  hora  se  desplace  más  de 
prisa,  y la  tecla  F3  que  se  desplace  la 
manilla  de  los  minutos  más  de  prisa.  Esto 
significa  que  el  niño  puede  colocar  las 
manillas  del  reloj  en  una  posición  apro- 
ximada sin  tener  que  esperar. 


genera  las  horas  en  punto  (1:00,  2:00, 
3:00,  etc.).  Las  medias  (4:30,  5:30,  6:30, 
etc.)  aparecen  en  el  nivel  dos.  El  nivel  tres 
presenta  los  múltiples  de  cinco  minutos 
después  de  la  hora  (7:35,  8:15,  9:10,  etc.). 

Cuando  se  para  el  reloj,  el  programa 
calcula  las  posiciones  de  las  manillas  y la 
hora  indicada.  Si  la  relación  es  correcta, 
suena  la  alarma  y aparece  la  palabra  "Si” 
junto  con  el  número  de  intentos  correctos 
hasta  ese  momento.  Cuando  el  niño  acierta 
tres  veces,  suena  una  sirena,  y el  jugador 
puede  elegir  otro  nivel  o dejar  de  jugar. 

La  versión  para  el  C-64  es  un  poco  más 
larga,  pero  el  formato  del  programa  es 
idéntico  (las  funciones  de  pantalla  y 
sonido  requieren  más  Pokes). 

Espero  que  este  programa  resulte  tan 
educativo  como  divertido.  ■ 


0 REM  PARA  EL  RELOJ  VIC-20 

1 Lí="  7326784979 1 5 8 O 0 3 8 O 2 4 8 O 2 O ñü  1 7 79 
947906734078 1 97822 “ 

2 LHÍ= " 7827787 1 79373025802 380208 0 1 67 
972790678 1 878207822 " 

3 I Hf = " +2 1 78+2 1 78-0 1 64-23 77-7377-226 
6-2 178-21 78+0 1 64+237 7+2377+2266 " 

4 I F'í  = " +2 1 78+2 1 78-0 1 64-2377-2377-226 
6-2 1 78-2 1 78+0 1 67+2377+2 377+2266 " 

5 B$- " 7778  7784780779 1 780498070806480 
598036790477947773" 

6 00=30720  V=36878 : S 1 =36874  32=36875 
: 33=36876 ■ 30=36879 ■ POKEV . 15 

10  PÜKESC • 1 74  PRIHT"  CCLRK3CPSPP3  [RVSON] 

D 1 AORAMR I SPO 3 DE  [ SPC 3 RELOJ C RVSOF F 3 " P 
RINT”[ CRSRD 3 " ; SPC <8J; "00 " PP INT"[ 6 SPC ] 
C5OOMM035" 

1 5 PP I NT " T. 3SPC 3 55 [ SH IFTNDC 2SPC ] 12[ SPC ] 

[ SH I FTM ] " = PR I NT " [ 4SPC JÍSHIFTNJ1U 4SPC 3 
1 C SH [ FTM 3 C SPC] 10" : PP I NT " [ SPC ] 50 L SH I F TN 1 
C9SPC] [SHIFTMJ " 

20  PR I NT " [ 2SPC ] [ COMI  1M ] 1 0C SPC ] RELOJ [ 2SPC 3 
2 C CONtlO 3"  PR I NT " C 2SPC 1 1 CGMMM 1 " . SPC < 1 
1); "CCÜMMO]" 

25  PR I NT " 45  C COMMM ] 9 [ 2SPC J C SH I FTQ ] [ SH I F T * 1 
[ COMM+  ] C 5 SPC ] C CQMMG  ] 1 5"  PR I NT " C .PC  ] 

C COMMM ] C5SPC ] [SHIFT-] C 5SPC J C cOMMG ] " 

30  PP I NT " 1 2SPC ] [ COMMM ] 8 L 4SPC J L SH I F I - ] 
í 4SPC J 4 L COMMG 1 " PR I NT " [ SPC ] 40 [ SH I F TM3 
C 4SPC 3 [ SH I F T-  3 [ 4SPC 3CSHIFTN 120" 


35  PRINT"  [4SPC3  [SHIFTM37L2SPC3  [ SHIFTQ3 
C 2SPC 3 5 C SH I FTN 3 " PR I NT" C 3SPC 3 35 í SH I FTM 3 
C 2SPC 3 6 1 2SPC 3 C SH I FTN  3 25 " 

40  PP I NT " [ 6SPC 3 [ 5CÜMMT 3 " PRINTTABC7) 

"30" 

45  PR I NT " [ CRSRD 3 [ 4SPC 3 HORR= C SPC  3 9 : 30 

50  PR I NT " [ CRSRD  3 PULS A [ SPC 3 T7  PARA [SPC 3 
EMPEZAR [ CRSRD 3 O [ SPC  3 ' I " . C SPC 3 1 NSTRUC 
C IONES. ", 

55  GETS$ ■ IFSí=""THEN55 

56  IFS$=" I "THEN58 

57  GOTO280 

58  PRINT " C CLP  3 [ 4SPC 3 C RVSON 3 1 RED  3 3 NST 
PUL C I ONESCPVSOFF 3 [ BLU 3 " ' PP I NT " 1 CRSRD 3 
I NTENTñC  SPC  3 PflPHR  [ SPC  3 EL.  t SPC  3 PELO  J " 

65  PPINT" CUANDO t SPC 3 1 .AS C SPC 3 : IñN I LLAS 
CSPCl"  PRINT" [CRSRD 1 INDIQUEN C SPC JLAtSPCJ 
HORA. " 

70  PR I NT " [ CRSRD 3 GANAS L SPC  3 C ON [ SPC 3 3 [ SPC  I 
ACIERTOS. " 

75  PP I NT " [ 2CRSRD 3 [ RVSON 3 TECLAS [ SPC J i • 
FCSPi:  ] CONTROL  [RVSOFFJ"  PRINT" lüPSRH] 

F1C  SF'i : 3 MUEVE  [ SPC  3 L A L SPC  1 MAN  1 L I H [ 6SPC  3 • 
CHICA" 

80  PP 1 NT " [ CRSRD 3 ' F3 ■ L SPC 3 MUE VF [ SPC 3 L 
A [SPC 3 GRANDE" 

85  PPINT " [CRSRD] 'F7- [ SPC 3 PAPAL SPC 3 EL 
CSPC3RELUJ" 

87  PPINT" [ 2CPSPD  J (PIJl  SACSPC3UNALSPC  I 
TECLA.)", 

90  OETSÍ  IFSí=" "THEN90 


F%j 


RED  LOCAL  PARA  COMMODORE  64 

POSIBILIDADES: 

• Más  de  20  puestos  de  trabajo. 

• Utilización  de  todos  los  periféricos  de  la  gama  profesional 
Commodore. 

• Conexión  de  todos  los  puestos  sobre  mismas  unidades  peri- 
féricas a través  BUS  IEEE. 

• Diálogo  bidirecciones  entre  puestos. 

• Manejo  a distancia  de  cualquier  ordenador. 

• Posibilidad  de  coger  y pasar  una  pantalla. 

• Cargar  un  programa  a todos  los  puestos  a la  vez. 

• Mandar  mensajes... 


* ^ 


> SISTEMA  POTENTE 

' FACIL  DE  MANEJAR.  NO  PRECISA  SOFTWARE 
ADAPTABLE  A LAS  CONDICIONES  MAS  EXIGENTES 
APLICACIONES  EDUCATIVAS.  COMERCIALES... 


B.  S.P 


Plaza  Joaquín  Folguera,  2.  B ARCELOS A-22.  Telé/.:  247  40  03. 
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ES  LA  “HORA”  DE  APRENDER 


1 50  PR I NT  " í CLR  ] L CRSRD 1 L spe  I [ RVSON  J D l 
F I CUL TRD F SPC ] DEL  L SPC J JUEGO “ 

1 55  PR I NT " [ 2CRSRD DDCSP'J HORAS ' PR I 
NT " C CRSRD  J < 7 :•  t SPC 3 HORAS [ SPC  J V t sl-i ..il 
2 1 SPC  J HORAS " 

160  PR I f T" C CRSRD J 1 3)  [SPC  3 INTERVALO' ■••[2  .R'.  I 
DE  1 2SPC  3 5 1 5SPC  J [ CRSRD  3 M 1 NU  TOS . " 

1 65  PR  I NT  " [ 5C-RSRD 3 PULSH [ SPC 3 1 ■ 2 • O ' spi  ) 

3."  PRINT" [ 2CRSRD3PUL SRESPC J 'F  ["•PC  I 
PHRHISPi  3FIN." 

170  GETDí  IFDÍ="  "THE.H1  70 

173  IFDi  ="F "THENPOKEV ■ 0 PÜKEct , 27  PR 

INT" ICLR J " END 

175  D=VHL<DÍ> 

180  I F D> 30RDC 1 T HEH l 70 

200  PR  1 NT  " [ CLP  3 " ¡ R=0  W«0  ROI  ES'  ■ 1 59 

2 1 0 PR I NT " [ 4CRSRR 1 [ 1 4C OMM»  ! " 

2 1 1 PR I NT " C 2CRSRR 3 C RVSON 1 C SH 1 F T£  I ! RVSOF F J 
l SH IFTCJlll 4CRSRR 3 1 2 t 5CRSRR 3 1 t SH IFTM3 

¿ 1 2 PR I NT " [ CRSRR 3 1 RVSON  JCSHIFIt  II RV  OF  * I 
CSHIFTE3" ;SPC<t6)i"tSHIFTM3" 

213  PRINT " t CRSRR J [RVSON 3 1 SPC 3CPV"  OFF 
10" .SPC' 15>3 "2CCOMMG3" 

1 4 PR  I NT  " [ CRSRR  3 C RVSON  3 L Spi  .1  [ RVSuF  F 1 
" . SPr . 18)  , 11  [ COCINO  1 " F'R  F NT  " 1 1 RSF'R  I L RVSON  1 
t SPC  3 1 RVSOF F 3 ” • SPC  ■ 1 8 > • " t COCINO  3 " PR  I 
NT " [ CRSRR ) í RVSON  3 L SPC 3 [ RVSOFF 1 " SPC • 1 
8 ' "[COCINO 3" 

2 1 5 PR  I N T " [ CRSRR  I L RVSON  3 [ SPC  1 f PV  c j 

" ; SPf  ••  1 3 1 • " l COCINO  I " PR  I NT  " l C PSRR  J 1 PVSi .'N  3 
[ SPC  3 [ RVSOFF  3 " SPl  :•  18).  “[  CONMG  I " 

216  PRINI "[ CRSRR 3 C RVSON 3 L SPC 3 1 P'  ' -OF c J 
9I7CRSRR  3 1 RVSON  1 1 2SPC  1 1 RVSOF  C 1 1 7ü  R-.PR  I 
3 [CONMG 3" 

2 1 7 PR 1 N T " [ CRSRR 3 1 RVSON 1 1 SPC  I í RVsOF C I 
L 8CRSRR  3 1 RVSON  3 L 2SPC  3 1 RVsOF  f i [ *CR'-RR  I 
t CONNO  3" 

2 1 8 F’R  INT "( CRSRR  3 [ RVSON 3 1 SPi  J r PV-.i  .F  c i 
"ÍSPCCIS)  • " [COCINO  J " PR  I NT " I i.RSPR  I L RV  "N  l 
l Spi  i [ RVSOFF 3 " . SPl  . 1 8 >;"[ COMNo 3 " 1 c I 

NT " L CRSRR 3 [RVSON 3 1 SPC 3 [RVSOF -3"  • n 
18) . "[ COMNO 3" 

2 1 9 PR I NT  " r CRSRR  3 I RVSON  1 1 SPC  I L RV  I 
"¿SPC  <18)  ; " [ CC'NMO  3 " RP I NT  " [ r RSRR  3 1 VSONJ 
[ SPC  3 [ RVSOFF  3 " ¿ SPC  ' 1 8 COMMi . I " 

220  PR  1 NT"  C CRSRR 3 1 RVSON 3 1 SP<  HRV.4'1  ' 1 

3"  . SPC.: i:  16  "4CCOHMG3  " PRINT"  l CRSRR  U RVSi  41 ! 
[ SPC 3 L RVSOFF  3 " , SPC  • 18  1 • " I CONI'H . i " 

221  PR I NT " t CPsRR 1 C COMM* i t RV?.« « 1 3 [ í 0MM4  1 

[ RVSOFF 371 6CRSRR3616CRSRR J5T i RsPRllSHIF  i. : 
" PRINT" [ 3CPSRP3 [ 16COMNT3 " 

240  HR= INT < RNDv 1 '412+1  • '=0 

242  I FD*3THENMN=  [ NT < RND ’ I * * 1- ' • ' '"T07 
48 

243  FFH=2THENNH=64INT' RIID'  1 •*,  • '>•«  1 • 

248 

247  NN=0 

248  IFMN=FH.  iRNN-  1 THE NPR ' NT" [Hi  iM  1“  ' • 

" : [SPl  1“  .RIOH'Cf'  "U"+R  ll.'HTT'  '-•!  FJ  5+l'N 
.i . 1 ) . 2 ) GOTO250 

249  PRINT"  [HoMJ  " • HF'.  " " '.•■♦C1N 

250  H=  1 F'N-U 

251  IFRN.  . 'IHFNF  =VHI  ■ Niri!' LHC  • H-  ' * 

4+1.4  ,■  > GO  i 0780 

270  PL-VRL  ( N I I'í ' L I ■ • H-  I '44+1  4' 

280  PE=VHL.  ('  M ! Dí  •'  Bt , 44RC1+ 1.4*' 

284  IFRM=0THENI  1=22  : PP=66  G>.iTfi2'+i:i 

285  1 1 =VRL ( M I Di IPi.t PM- 1 ) 45+ 1 ■ 3 ■ ■■ 

286  PP«Vftl  ■:  NI  Di':  1 Pl  • ' RM- 1 *45+4 
290  F'ÜK  EF'B , 1 60  POC  EPB+CO  • 0 
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;-:00  FORK=  1 T05  P0KEPB+K4I 1 , PP  PÜKEPB+ 

141 1 +LI.I  • 0 HEKT|: 

•:05  POCES  1 240  F0PK=1  T01 0 NEXTL  F'f  KE 
S1..0 

310  I FRM.  2THEN I = VAL  < M I DI 1 1HÍ  - <H--1.)#5 
+ 1-3),'  P=Vftl  '.NI Di'  IHi  < H- 1 '45+4.2-')' 
GOTO330 

320  I = VAL 1 M 1 D$ ■-  IPi.  <H- 1 '45+1  . : ' ■ P=V 
AL < M I Di < I Pi  • < H- 1 '45+4.2') 

330  PÜKEPL  160  FüKFPL+i  0. 6 

34i  F0RK=1T03  P0KEPL+K4I . F'  POKEPL +K 4 

i +co ■ 6 nextk 

350  F ORI  * 1 T 0600  NEXTK 

353  I F Q2= 1 THEN650 

355  GLTSi  1FSÍ=""THEN  :'79 

357  IFSÍ=" ( F 1 ]" FHENRM=RN+12  GÜ70379 

358  I FSf  = " [ F-  3 I " T HF  NRM=PM+2  00 ' 1 ' ' 379 

359  . FHR=HANDC1N=RM  1 HE  N500 

360  GOTO600 

379  POKES2.240  FORC =1 TO10  Nbl  IT  ROLE 
S2  • 0 

380  P0KEPB.32  F0PF  =1T05  POKEPB+F  4 11, 

32  NEXTL 

381  POKEPL  • 32  FORF  - I I"'  F'OKEFT  +K41  , 3 
2 NEXTL 

385  IFO=1THEN240 

386  IFQ2=1 THEN251 

390  RM=RM+ 1 

391  I FPN> 1 1 THENH=M+ 1 RM=n 

392  IFHS12THEM750 
400  00 T 0251 

500  FORK=  1 T02  PRINT  " T HñM]  "S+'i.  ■:  1 4 ' . "S 
I F4SPCT ” . R+l , 

501  F0PJ=1T015  F0PX»n01«  P0KES3  ■ 730 
NEXTX  PO'  ES3.0  NEXF.J 

502  PR I NT  " l HÜM  ] " . SPC  < 1 4 > ; " F 4-.I  'C  3 " PO 
KLS  C.  0 ' F0RX*1  TO700  NEXT  X NEXIK 

503  R=R+ 1 H=0  PRINT" CHOM]"/SPC<20> -R 

504  1 F R-3THENPR  1 NT " F HON  J F HN I AS  F I ' U 1 L • " >PC 
" FORX=  1 TO50  P0KE5.3 . 1 90+X  : NEXTX  POCE 
S3.0  GOTO700 

505  F'R  1 NT " t HQM ] PULSA I SPC  IF7LSRL  IF'HRH 
f-.PC  1 EMPEZAR.  " . 

506  OE I Si  IFSÍ=" "THFN50' 

5 1 0 PR  I N T " F HON  J [ 22SPC  1 " ■ '•'=  I 00  ' i '38M 

hi*i  POLI  SI  • 190  FiiRX=l  10400  ITF:  :c  . l'iTI 
ESI .0  02= 1 RN-MN  H-  HR  H=W+t 
603  0OTO380 

650  PR  1 N t " [ HON  ! “ , SPC . ■•  < j . " CORRF O ID"" 

02 =" 

652  FUP. : - 1 T 02 1 100  NEX 1 '.  \ 

65  IFU.--2THFN10 

654  PRINT'  FH0NTP0LSALSPC1F  71  sPi.  l'-'hPH 
I -pl  1EITRE.  hr.", 

655  GE l S í IF- f " THFN655 
. 57  PRINT" [HQM] [22SPI  1" 

66tí  0=1  OOTO380 

, 00  h.ir.;  tiui upo  ne:  l: 

70]  oo f 01 60 

FIN 


¡INCREIBLES  TARJETAS 
PARA  COM  MODORES  64  Y VIC-20 
DE  80  COLUMNAS! 

LA  TARJETA  DE  64K  ES  LA  PERFECTA  COMBINACION  PARA  LA  TARJETA  DE  40/80  COLUMNAS: 

- Puede  escoger  entre  22/40/80  columnas  y obtiene  31743  bytes  libres!!! 

- El  sofware  del  EPROM  de  la  tarjeta  le  permite  utilizar  todos  los  comandos  de  ficheros  (OPEN,  CLOSE,  PRINT,  INPUT,  GET,  SAVE 
and  LOAD)  con  los  31232  Bytes  de  Memoria  «oculta»,  lo  que  produce  la  sensación  de  qué  hay  8 cassettes  super  rápidos 
conectados  a su  Vic-20  Imagínese...  menos  de  1 segundo  para  guardar  28  Kü! 


DISTRIBUIDORES  PARA  TODA  ESPAÑA 


• Tarjeta  COMMODORE  64 
80  columnas 


• Tarjeta  VIC-20 
Ampliación  de  memoria 
64  K-  RAM 


• Slots  de  expansión 
para  VIC-20  y 64 
de  2 y 5 para  conexión 
de  tarjetas 


• Tarjeta  VIC-20  40/80  columnas 


PEDIDOS 


DISTRIBUIDORES 
Y PARTICULARES 


Tel.  93/  250  84  40/  Contestador  Aut. 
Escribir  indicando  la  sección 
C/.  Buenos  Aires  n.°  30  2o  3a 
BARCELONA-36 


FEPPE  -mOPET  /.A. 


¡ATENCION! 

SOFTWARE  80  COLUMNAS 


Estos  programas  requieren  las  tarjetas  distribuidas  por  FERRE-MORET, 
S.  A.  Para  el  VIC-20,  aunque  los  programas  funcionan  con  un  mínimo  de 
I6K,  están  diseñados  para  su  utilización  con  la  Tarjeta  de  64K  RAM 
Capacidad  de  almacenaje  ilimitada  Todos  los  programas  se  venden  con 
un  manual  explicativo  en  castellano. 

AGENDA  DOMESTICA 
Y DE  NEGOCIOS  (REF.  ADD4080C) 

Incluye  una  (unción  de  búsqueda  que  identifica  la  totalidad  o parte  de  los 
nombres,  direcciones  o números  de  teléfono,  es  decir,  el  sistema  permite 
identificar  un  nombre,  dirección  o teléfono,  aunque  únicamente  se 
recuerde  parte  de  la  información  Si  el  usuario  no  recuerda  una  dirección 
concreta,  llamando  el  nombre  de  la  población,  obtendrá  todas  las 
direcciones  de  esa  población. 

CONTROL  STOCK  40  COL.  (REF.  st40C) 

CONTROL  STOCK  COL  (REF.  st80C) 

Posee  una  función  de  búsqueda  que  permite  visualizar  productos 
concretos,  especificando  el  producto,  su  descripción,  lugar  de  almacena- 
je, proveedor,  dirección  del  proveedor,  código  de  identificación  del 
producto,  precio  de  coste,  precio  de  venta,  cantidad  (en  paquetes,  cajas, 
etc.),  valoración  del  stock,  niveles  máximos  y mínimos  de  stock.  Si  además 
se  dispone  de  impresora,  se  pueden  obtener  listados  de  productos 
específicos  y listados  de  todo  el  almacén. 

PEDIDOS,  ALBARANES, 

FACTURAS  (REF.  ID04080CP) 

Se  precisa  la  tarjeta  de  64K  RAM  impresora  El  programa  permite  imprimir 
encabezamiento  con  el  nombre  de  la  Empresa  y su  dirección  y se  puede 
elegir  que  el  documento  sea  una  Factura,  Albarán  o Pedido.  Otros  detalles 
del  encabezamiento  son:  número  de  factura,  fecha,  número  de  pedido  del 
cliente,  referencia  del  cliente,  etc.  El  programa  permite  la  introducción  de 
varios  ITE's,  especifica  el  producto,  descripción,  cantidad,  precio  antes  de 
impuestos,  precios  con  impuestos  incluidos,  gastos  de  envío  etc.  Numera- 
ción automática  de  los  documentos.  Permite  hacer  copias. 


DIETARIO  DOMESTICO 
Y DE  NEGOCIOS  (REF.  HBD80CDP) 

Funciona  con  Cassette  y Unidad  de  Disco.  El  programa  pide  la  techa  e 
identifica  cualquier  entrevista  concertada  para  ese  día,  detallando  con 
quién  es  la  entrevista,  motivo  de  la  misma,  hora  y lugar  de  la  reunión, 
duración  de  la  reunión,  etc. 

Permite  la  búsqueda  diaria  o mensual  para  identificar  reuniones  por  la 
fecha,  o lugar  de  reunión,  o persona,  tanto  en  el  pasado  como  en  el  futuro, 
y además  visualiza  un  calendario. 


CONTROL  DE  ALMACEN 
A 80  COL.  (REF.  ST80CDP) 

Los  datos  se  pueden  almacenar  en  cassette  o Unidad  de  Disco.  Se 
incluye  la  descripción  de  los  productos,  su  referencia  o número,  cantidad, 
precio  de  compra,  precio  de  venta,  niveles  máximo  y mínimo  de  existen- 
cias. pedidos  mínimos  exigidos  por  los  proveedores,  nombre  y dirección 
del  proveedor,  etc.  Se  dispone  de  una  función  de  búsqueda,  que  permite 
visualizar  todo  el  almacén,  productos  cuya  cantidad  exceda  la  máxima 
autorizada,  productos  con  existencia  por  debajo  del  nivel  mínimo  requeri- 
do, salidas  de  almacén,  valor  del  stock,  precios  y márgenes. 


FICHERO  DE  PERSONAL 
A 80  COL.  (REF.  PRF80CDP) 

Se  necesita  impresora.  El  programa  incluye  el  nombre,  dirección,  teléfo- 
no. edad,  fecha  de  nacimiento,  número,  sexo,  estado,  número  de  Seguri- 
dad Social,  Cualificaciones,  Historial  de  empleo,  Estudios. sueldo,  funcio- 
nes que  realiza  actualmente,  programas  de  traming  a los  que  ha  asistido, 
etc.  Se  pueden  visualizar  todos  los  datos  o seleccionar  los  que  se  desean, 
mediante  la  utilización  de  una  función  de  búsqueda.  Excelente  para 
selección  de  personal,  ya  que  permite  identificación  por  nombre,  pero 
también  se  puede  buscar  por  una  cualif  icación  o característica  concreta, 
por  la  edad,  experiencia,  etc. 


ES  LA  “HORA”  DE 


•'  *E-M  PARA  EL  REL0J-C64 
. •_*=  ' 132?  1409 1529 1689176?  17631  76016 
78151813981 3201323" 

2 LH*=" 1328 1449 15291 769176217631 7581 
6381518131813201323" 

3 I Hí  = " +3978+3978-8 145-4 1 77-41 77-486 
6-3978-3978+0 1 45+4 17  7+41 77+4066  " 

4 I P$ =" +3978+3978-0 1 64-4 1 77-4 1 77-406 
6-3978-3978+0 1 67+4 1 77+4 1 77+4066 " 

5 Bí=  " 1 243 1 24'+ 1 33 1 1 53 1 1 77 1 1 849 1 843 1 8 
38175615161 3 1 6 1 238 " 82=54285 

6 80=54272  V=54296  80=53281  80=53280 
W2=54283 : 02=54284  H2=54280  L2=54279 

8 F0RX=54272T054296  PGK.EX, 0 NEXTX  PO 
KEV, 15  P0KEA2, 116  P0KES2 • 1 28 

10  POKESC,  12  POKEBO,  3 

1 1 PP I NT " [ CLP  1 C 5CRSPP 1 1 C0MH4 J 1 RVSON I 

C SPC  ] D I AGRAMA  [ SPC  J DE  C 8PC  3 HORR  [ SPC 1 L RV80F F ) 

" PRINT" E CRSRD 1 " . SPC ( i > i " 00 " PP I NT " [ 6SPC 1 
E5CQMM0] ESPC35" 

15  PR I NT " C 3SPC ] 55 ESHIF TN J t 2SPC J12E SPC 1 
CSHIFTMr  Pfil NT" C 4SPC: JESHIFTN311E 3SPC  1 
1 C SPC 3 ESHIFTM J [ SPC 119"  PP I NT " E SPC 1 50 
ESHIFTN3  E9SPC3ESHIFTM3 " 

20  PP  I NT " [ 2SPC 1 1.  COMMM  J 1 0 C SPC  3 RELOJ  E SPC  ] 

2 C SPC  J [ C ÜMMG  ] 11  PR  I NT  " L 2SPC  ] L I.  OMMM 1 “ . 

SPC< 11). " C CÜMMG  3 " 

25  PP I NT “ 45 [ COMMM 1 9C2SPC ] ! SH IFTO ] [SH I FT» ] 

C C OMM+ 1 [ 4 SPC 1 3 1 CÜMMG 115"  PR 1 NT " C 2SPC J 
1 COMMM  J 1 5SPC 3 C SH I FT- 3 E 5SPC 3 1 CÜMMG 3 " 

30  PR I NT " C 2SPC  3 C COMMM 1 8 [ 4SPC 3CSHIFT-3 
1 3SPC  3 4 C SPC  3 [ CÜMMG  3 " PR  INTE  SPC  ) 40  [ 'SH  1 F TM  3 
L 4 SPC  3 E SH I FT-  I E 4SPC  3 1 'SH  I F TN  3 20 " 

35  PR I NT " [ 4SPC 3 L SH 1 FTM  3 [ SPC  3 7 1 SPC 3 1 SH 1 F 1 0 1 
E SPC 3 5 E SPC  3 E SH IFTN 3 " PP I N T " 1 3SPC 3 35 ESHLF TM  3 
E 2SPC:  J 6 E 2SPC  3ESHIFTN325" 

40  PR I NT" E SSPC 3 E 5C0MMT  ] " PR 1 NT T 88 • 7 > 

''30" 

45  PR I NT " l CRSRD  3 C 4SPC 1H0PA=( SPC 3 9 : 30 

50  PR1NT"  [2CRSPD3 !.  SP1  JPULSACSPCJ  F? 

E SPC  3 P0R0 L SPC  J COMENZAR I.  SPC  J • 0 1 2SPC  3 R 
ULSfl"  PRINT"  ESF'03 " 1 - E'SPC  JPRR0ESPC  )?N 
S TRUCO  IONES. " 

55  GETSí  IFSí=" " THEN55 

56  1 F3í=" I " THFH58 

57  GOTO200 

59  PP  1 NT " E CLP  1 " ,i  8PL  1 1 1 [RVSON  ,'  ;.R-  ' 

INSTRUI  C I ONE S E SPi.  3 [ RVSC'P F J ' 

70  c-pinT" EC.PSRDJ t SP'.:3G«N8S: S*="  1«  •'  - ' 
Hi-DÜiSPCJ  SiSPC  3VECF'-". 

75  PR  I NT  " [ 2CRSRD  H RVSON  3 E SPC  3 TECLRS  t SPC  3 . 
DE C SPC 3 CONTROL (SPC3E RVSOFF 3"  PRINT " £ ¿CRSRD 3 
F 1 ' E SPC  3 MIJE  VE  1 SPC3L8E  SPC  3MRN I LLRE  SPC  1 
CHICA." 

80  F'RINT"  E CRSRD 3 'F  3 " E SPC 3 MUEVE l SPC  3L 
fl [ SPC 3 MRN I LLR  E SPC 3 GRANDE . " 

«5  PRINT"  E CRSRD 3 F?- fSPC  JPAPhi  :7.pi.  1 F L 
E SPC 3 RELOJ. " 

87  PRINT" E 3CRSPD I ESPC 3 (PULSfilSPC 3 UNA 
[SPC3TECLR. )" 

80  GETSÍ : IF8Í=" " THEN90 
1 50  PQKESC  • 1 1 POKE.  BO , 7 ; PR  I NT " t CL R 3 1 WHT  1 
E CRSRD 3 f RVSON 3 D I F 1 COL TRDE SPC  J DE t SPC 3 
LA  [ SPC  3 PPUE BA  I.  PVSOF F 3 " 

1 55  pR I NT " E CRSRD 3 < 1 ) E SPC 3 MORAS " PR! N 
T " £ CRSRD 3 < 2 ) E SPC 3 HOPAS  E SPC  3 V 1 SPC 3 1 /2 
-HORAS" 

1 60  PR I NT " [ CRSRD 3 < 3 ) [ SPC 3 1 N , ERVRLOS- 
5ESPC3MIN. " 

165  PRINT"!  6CRSPD  3 E 2SPC  3 PULSA  1 SPC  31., 

2 . nr 2SPC 33" ■ PRINT" E CRSRD  3 E SPC 3 0 1 2CPSP1  J 


! 2SPC  3 PULSA [ SPC 3'F'E SPC 3 PAPA  I SPi  JFIN 

170  GETDÍ  IFDÍ=" " THEN1 70 
173  I FDí = "F" THENPOKEV , 0 : ' 'OKESC , 6 POK 
EBO, 14  PRINT" ECLR3  CCOMM73 " END 
175  D=VRL < Dí  ) 

180  I FD>30RD< 1 THEN 1 70 

200  PRINT" ECLR3 ERED3 " P=0  U=0  POKESC 

, 8 : POKEBO, 2 

210  PRINTTRB'.  12>"E15COMM03"  PRINTTRE 
< 10)"!  RVSON  3CSHIFTE3E  F'VSGFF  3 E SH  I F T £ 3 
" , SPC ' 15), " ESHIFTM3 " 

211  PR I NTTMB ( 9 i " E RVSON  3 E SH I F ' £ 3 E RVSOFF 3 
E SH I FT£ ] E SPC 3 1 1 E5SPG3 12E6SPC  3 1 ESHIFTM] 

" ; PRINTTRB! 8 > " [ RVSON  3 E SH I FT  £ 3 1 RV SOF F 3 
E SH I F T£  3 " , SPC < 1 9 : , " E SH I FTM  3 " 

212  PRINTTRB' 8>"ERVSON3 ESPC 3 E RVSOFF  ] 

10" .SPCÍ 18) ■ "¿ESHIFTM 3 " PRINTTRB- 3>" 

E RVSON  3 E SPC  3 E RVSOFF  3 " , SPC  22  > , " ! CC'MMG  3 

213  PRINTTRB C 8 ) " ! RVSON 3 1 SPC JE RVSOFF 3 

" , SPC<?2> i " C CÜMMG 3 " PRINTTRB <8  1 " E RVSON 3 
E SPC  3 E RVSOFF  3 " , SPC  ( 22  '>  - " E COMMG  3 " 

214  PP I NT  TRB < 8 > " ! RVSON 3 C SPC  I RVSOFF 3 

" i SPC-:' 22 > ; " E COMMG 3 " PRINTT-'i  1 8 - "[RVSON 3 
[ SPC 3 E RVSOFF  3 " , SPC i 22 > i “ ECi  MMG 3 " 

215  PRINTTRB-;  8 > " E RVSON  3 £ 8 PC  JE  RVSOFF  3 
" ; SPC  < 9 ) , " ! RVSON 3 E4SPC 3 E RVSOFF 3 " ¡ SPC 

9 ) ; "E  COMMG  3" 

¿16  PP  I NTT HB -:  8)"l  RVSON  3 E SPC  31  RVSOFF  i 
[ SPC 39", SPC < 7 ) , " E RVSON 3 C 4SPC 1 C RVSOFF 3 
" , SPC  < 7 :- , "3E SPC 3 EC0MMG3" 

217  PRINTTRB-:  8 > " t RVSON 3 [SPC  3 1 PVSOF F 1 
" . SPC 9 - • " ! RVSON  ] C 4 SPC  3 ! RVSOFF  J " . SPC 
•19),  "C COMMG 3" 

218  PRINT  1AB-  8 • " [RVS0N1I.  ■+  . .1  IRVSUFF  I 
" . SPC  • 9 RVSON  1 ! 4SPC  3 1 PVSOF F 3 " -.Pl 

9 ;»  , - [COMMG]  1 

219  PR  1 NT  TRB-  8>  " I PVSü'TJ  EsPl  ' I.  R'-"-' 11  1 I 

» , «¡pr  i . , " [criMM'j  J 1 pR  INI  ' RP' c / • ¡,J  J 
L SPC 3 [ RVSOFF  3 " , SPC  < 22 >,"[ COMMG  3 " 

220  PRINT TAB‘,8  >"  [ RVSON 3 ESPC  3 [RVSOFF  I 

" • SPC:'  22)  , " E COMMG 3 " PRINTT  HB'  8 ) " E RVSON 3 
[ SPC  3 E RVSOFF  3 " • SPC  C 22  •-  • “ E COMMG  3 " 

22 1 RR I NT  TRB?  8 " [ RVSON  3 C SPC  3 [ PVSOF  F 3 

•• ; SPC  • 22 ) " [ COMMG  3 " PP  1 NT  TRB-  8 • " E C OMM*  3 
[RVSON] ECOMM# 1 [ PVSUFF  18" • SP'  ’ 18-- "4[SHIF TN J 

¿22  RR 1 N T1R8 ' 9 > " E COMMK  3 £ RVSON JEC OMM# 3 
[ PVSOF  F 3 " • 'SPC ■:  1 8 > . " [ '-.H I F l'N  3 " PP  1 N I T m 
8 1 1 0 > " [ COMM* 3 C RVSON 3 1 COMM* 3 L RVSOFF 3 7 
" , jPC  (,  6),  "6".  SPC  -•  7 > , " 5 E SHIFTN1" 

223  F'P INTThB'  1 I • " E C i IMM* 3 E PVSON  1 ! COMI-l*  I 
E RVSOFF 1 L 1 4COMM0  JLSHIF TH ] " 

¿40  MR-  ‘NT > PHD-  D4H2+1  > 0=0 
;4.  - ilHE NMH”  I N I RND • 1 '*12'  00  T 02 

¿43  I F'D=¿THENMN*64 1 NT  (.RNDC  1 :-*2.'  GOIO 
248 

247  MN=0 

248  I F MN=@OPMN=  1 I HF  1 -’P|  NT  " l HUM  3 " HP  . 

" 0 " ; 54MN  00T025M 

249  F'RINT"  [H0H3  " .MR  1 " : 54MN 

250  H= 1 RM=0 

25 1 1 FPMV2THENPL  =VAL ' M 1 Dí ‘ LHÍ . ( H- 1 > ♦ 

4+1  4.1,  GUI 0280 

261  IFRÍ'1  1 1THENH=H+1  PM=0 

¿62  I FH> 1 2THEN258 

2 70  PL=VAL ' M 1 Dí  ■'  I.  i,  H-l  ' *4+1 . 4 ■ > 

280  PB=VAL  C M I Di  • t:í  . 44PM+ 1,4, 

784  IFPM=0THENII'=40  PP=66  00T0290 
¿05  . I =VRL 1 M I I.'í  < I Pí  ■ 1 RM- 1 .-45+1,  3 > > 

796  pp=V'RL-  MIDI 1 l Pf  ■ ' RM- 1 • *5+4 ,2>> 

¿5!+  IF  - RM>  1 1 i OP vH>  1 2 .- THEN26 1 


'P  I NT  " I HOM  ] ' 
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290  POKEPB  • 160  POKEPB+CQ.  0 

300  FORK  = 1 TOS  POKEPB+K* 1 1 . PP  POKEPB+ 

KHfII+CO.0  NEXTK 

305  P0KEH2 . 30  P0K2L2 ,141  P0KEW2 . 1 ? F 
ORK=  1 Tü  1 0 ■ HE  ;t(  POKE M2  • 6' 

3)W  IFPH  ¿THEH 1 =VAL< MIDÍ;  IHI  . • H-i  '*5 
+ 1 - 3 > ' P*VAL < M 1 Di (.  I Hi . <H-1  > *5+4 , ¿ > .. 
GÜT 0330 

320  1 = VRL '■  H I Di ' I PI  • 1 H- 1 : *5+ 1-3)  ■ P=V 
AL < M 1 DI 1 I Pi  • ■:  H- 1 *5+4 , 2 > > 

330  POKEPL • 160  POKEPL +C0- 6 
340  F ORK.  = 1 TOS  POKEPL +K+I-P  POKEPL+K* 
I+CÜ.6  NEXTK 
350  FORK  = .1 T 0600  ■ NEXTK 
353  IPQ2=1 THEH650 
355  GETSI  I FS$= " " THEN3 39 
35?  I FS$= " [ F 1 ]" THENRM=RM+ ' 2 GÜT0379 
353  IFSl="CF3]"THENRM=RM+2  G0T037? 
359  IFHR=HANDMN=RMTHEN500 
{60  'TDTO600 

•4EH2.61  P0KEL2 . 1 26  POK EW2 , 1 ? F 
ORK* I ) o 1 0 : NEXTK  P0KEW2 - 0 

380  POKEPB . 32  FORK» 1 TOS  POKEPB+K *11- 
32 : NEXTK 

381  POKEPL-  32  F0RK.=  1T03  POKEPL  *K*I  . 3 
2 ■ NEXTK 

385  IFQ» 1 THEN240 

386  1FQ2* 1 THEN251 

390  RM-RM+1 

391  1 FRM> 1 1 THENH*H+ 1 RM=0 

392  I FH> 1 2THEN250 
40O  00T0251 


500  FORK»  1 T02  PR I NT " [ HOM  ] " SF'C 20  ) - "S  I ' 
58 1 FORX» 1 TO 1 0 P0KEH2 - 1 08  P0KEL2 ■ 223 
P0KEW2 ..  1 ? FORJ»  1 T 0 1 0 : NEXTJ 

502  POKEW2-0  NEXTX 

503  PR I NT ••  [ HOM 3 ” - SPC < 20);"t 4SPC ] 11  FO 
RX= 1 TO 1 00  NEXTX  NEXTK 

504  P=R+ 1 U=0 : PRINT" [ HOM] “ , SPC <3? > - P 

505  1 FR=3T HENPR I N I " [ HOM 1 C SPC ] C RVSON 1 
FftNTfiSTICOCRVSOFF] [ 18SPC3 " 00  TO507 

506  PRINT- C HOM I PULSA t SPC  J F 7 [ SPC  ] F'H 
Rfit SPC] EMPEZAR. " GOTO509 

507  F0RX=1T075  P0KEW2.33  P0KEH2- X PO 
KEL2- 100+2*X  FORJ» IT OIA  NEXTI : NEXTX 

508  P0KEW2 ■ 0 • GOTO700 

509  GETSI  I F3I= THEN509 

510  PR I NT " [ HOM ] [ 24SPC 1 " 0= 1 OÜT  0380 

600  P0KEH2-8  PÚKEL2- 23  P0KEW2 • 33  FOR 
X» 1 T 0900  NEXTX ■ P0KEW2 • 0 

601  02=1  RM=MN  H=HR  U=U+ 1 
603  GOTO380 

650  PRINT" [HOM3“;SPCf9>; "CORREGIDO" 

02»  0 

652  FORX* 1 T 02000  NEX TX 

653  IFW>2THEN10 

654  PRINT" [HOM] PULSA L'SPC  ) F?  CSPC1PA 
R A [ SPC ] EMPEZAR . C 2SPC J " 

655  GETSI  IFSi=” "THEN655 
65?  PR I NT " [ HOM 1 [ 26SPC 1 " 

660  0=1  GOTO380 

700  FORX» 1T0 1000  NEXTX 

701  GOTO 150 

FIN 


TODAVIA  NO  TIENE  UD.  UN  C0MM0D0RE-64? 


NO  DEJE  ESCAPAR  LA  OCASION 


FIJESE  QUE  PRECIOS 


FACILIDADES 
DE  PAGO 
FINANCIACION: 
De  6 a 30  meses 


\<¿0  ✓ 


XXíX  x 

X ^ O-  ' 


SI  Va  TIENE  SU  COMMODORE-64  PASE  POR  NUESTRA  TIENDA  Y VEA  NUESTRAS  OFERTAS 
PARA  COMPLETAR  SU  EQUIPO  CON  LOS  MEJORES  COMPLEMENTOS  Y PROGRAMAS 


ncvo/rfigit 

'4  microinformalica 


C/Aragón,  472  - Telt.  246  27  75  - Barcelona-13 
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COMO  RESUCITAR 
LOS  FICHEROS  ASESINADOS 

No  es  necesario 

que  intervenga  la  mano  de  Dios  para  que  se  resuciten 
los  ficheros  asesinados 


En  ese  momento  hubiera  tirado  el 
ordenador  por  la  ventana  con 
mucho  gusto  y encima  hubiera  dis- 
frutado enormemente  al  ver  cómo  se 
hacia  pedazos  en  el  suelo  allí  abajo.  Me 
daba  igual  que  la  metedura  de  pata  había 
sido  mía,  el  ordenador  ni  siquiera  había 
intentado  impedírmelo. 

Acababa  de  borrar  las  únicas  dos 
copias  que  tenia  de  un  programa  que  me 
había  costado  cinco  días  de  trabajo.  No 
me  preguntes  por  qué  lo  hice;  en  ese 
momento  yo  tenia  los  cables  cruzados. 
Al  cargar  y listar  el  directorio  del  disco 
para  buscar  mi  programa,  descubrí 
horrorizado  que  ya  no  estaba  allí. 
Empecé  a sudar. 

Pero  entonces  me  paré  a pensar.  Si  un 
fichero  se  borra,  no  quiere  decir  que  se 
haya  destruido.  Los  registros  fisicos 
todavía  están  en  el  disco.  Lo  único  que  ha 
cambiado  ha  sido  la  entrada  en  el  directo 
rio  del  disco.  Si  se  pudiera  volver  a cam- 
biar la  entrada,  el  fichero  podia  ser  res- 
taurado siempre  y cuando  no  se  volviera  a 
salvar  un  programa  nuevo  en  el  mismo 
disco. 

Con  mucha  calma,  saqué  el  disco  de  la 
unidad,  lo  guardé  en  un  lugar  seguro,  y 
formateé  un  disco  nuevo  para  reempla- 
zarlo. Al  consultar  el  manual  de  la  unidad 
de  discos  1541  descubrí  lo  que  quería 
saber:  un  solo  byte  de  datos  en  el  directo- 
rio del  disco  marca  la  diferencia  entre  un 
fichero  "vivo”  y un  fichero  “muerto".  Si 
pudiese  devolverle  el  valor  correcto  al 
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byte,  el  fichero  volvería  a aparecer 
milagrosamente. 

El  problema  era  sacar  el  byte  del  disco, 
modificarlo  y volverlo  a colocar.  Los 
comandos  Read-Block  y Write-Block  (o 
USER1  y USER2)  podían  ser  utilizados 
para  sacar  el  bloque  y volver  a meterlo. 
Sin  embargo,  otra  cuestión  seria  realizar 
una  modificación  en  dicho  bloque. 

Lo  que  estaba  claro  era  que  me  hacia 
falta  un  programa  editor  de  discos  bas- 
tante complicado.  Como  no  encontré 
ninguno,  decidí  escribirlo  yo  mismo. 

El  programa  "Editor  de  Discos  64"  es 
un  editor  de  pistas  y sectores  de  pantalla 
entera  para  el  C-64  y la  unidad  de  discos 
1541.  Cualquier  pista  y sector  — es  decir, 
un  bloque — puede  ser  llamado,  modifi- 
cado y devuelto  al  disco.  Además,  cual- 
quier modificación  realizada  pero  no  gra- 
bada puede  ser  borrada  para  poder 
empezar  de  nuevo,  si  es  necesario. 

Geografía  del  Disco 

Formatear  un  disco  significa  que  la 
superficie  del  disco  queda  dividido  en  una 
serie  de  pistas  (unas  anillas  magnéticas 


concéntricas  sobre  las  cuales  se  graba  la 
información  codificada),  y sectores  (los 
segmentos  de  las  anillas).  La  información 
almacenada  en  un  sector  de  una  sola  pista 
se  llama  un  bloque. 

Un  bloque,  que  puede  contener  hasta 
256  bytes  de  información,  es  la  unidad 
más  pequeña  donde  los  dalos  pueden  ser 
almacenados  en  un  disco.  Una  secuencia 
lógica  de  bloques,  que  contiene  un  solo 
programa,  o una  serie  de  registros,  o 
cualquier  otra  cosa,  constituye  un  fichero. 
Los  bloques  que  componen  el  fichero  no 
se  encuentran  necesariamente  en  orden, 
pero  el  sistema  operativo  de  disco  (DOS) 
de  Commodore  los  trata  como  si  lo  estu- 
vieran. 

Cuando  se  carga  un  programa  del 
disco,  el  DOS  consulta  el  directorio  del 
disco,  localiza  el  bloque  donde  comienza 
un  fichero,  determinado  y transfiere  cada 
bloque  del  fichero,  en  la  secuencia 
correcta,  a la  memoria  del  ordenador, 
como  si  el  programa  se  hubiese  almace- 
nado como  una  sola  unidad  consecutiva. 
Los  bloques  dentro  de  un  fichero  siempre 
son  identificados,  en  el  directorio  y en 
cualquier  otro  sitio,  por  sus  números  de 
pista  y de  sector.  Después  hablaremos  de 
esto  con  más  detalle. 

Lo  primero  que  hace  el  programa  "Edi- 
tor de  Discos  64”  es  solicitar  un  número 
de  pista.  En  la  unidad  1541,  este  número 
puede  ser  cualquiera  entre  1 y 35.  A con- 
tinuación pide  un  número  de  sector  más 
alto  para  una  pista  determinada.  La 
figura  1 muestra  el  número  de  sectores  en 
cada  pista. 

Se  puede  contestar  con  números  deci- 
males o hexadecimales  dentro  del  rango 
permitido.  (Los  números  hexadecimales 
son  identificados  por  el  signo  de  dólar 
que  llevan  delante  (SOOI 1)).  Los  números 
que  se  encuentren  fuera  del  limite  permi- 
tido no  serán  aceptados. 

Si  se  elige,  por  ejemplo,  la  pista  10  y el 
sector  4,  aparece  en  pantalla  el  mensaje 
LEYENDO  PISTA  10  SECTOR  4 PARTE 


Suscríbase  a MicroSistemas  antes  del  30  de  noviembre  próximo 
y participará  en  el  sorteo  de  un  magnífico  ordenador  personal 
APPLE  II  c. 

Para  los  que  ya  estén  suscritos  también  tendrán  opción  de 
conseguir  el  APPLE  II  c.  Si  desea  conocer  su  número  en  el 
sorteo  llámenos 
al  teléfono 
231  23  95. 

I labra  también 

"M..-  5 1:  v- III  i« 

para  nuestros 
suscriptorcs 

quedaremos 
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nuestro  stand  ak  / 

del  SIMO. 


BOLETIN  DE  SUSCRIPCION  A MICROSISTEMAS 


Nombre  y Apellidos 

Puesto  

Compañía  


Dirección 


Teléf.: 


Ciudad 


Suscripción  anual  2.950  pías. 

Deseo  iniciar  la  suscripción  con  el  próximo  número 
Id  Adjunio  cheque  por  2.950  ptas. 

O Reembolso  más  gastos  del  mismo  al  recibir  el  primer  número  de  la  suscripción. 
(Enviara  Gravina.  13-1®  Izda  Madrid-4  - Teléf:  231  23  88/95) 
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1 (“PARTE  1”  se  refiere  al  hecho  de  que 
sólo  la  mitad  de  un  bloque  — 128  bytes — 
aparece  en  pantalla  a la  vez).  El  contenido 
del  bloque  identificado  por  los  números 
de  pista  y sector  sale  en  pantalla  debajo 
del  mensaje  tanto  en  hexadecimal  como 
en  ASCII. 

Cuando  termina  de  llenarse  la  pantalla, 
aparece  un  cursor  no  intermitente  en  la 
esquina  superior  izquierda  del  volcado 
hexadecimal,  que  tapa  por  completo  el 
primer  par  de  dígitos  hexadecimales. 
Puedes  mover  el  cursor  utilizando  las 
teclas  normales  para  el  desplazamiento 
del  cursor  y colocarlo  encima  de  los  dígi- 
tos hexadecimales  que  quieres  modificar. 
Para  realizar  el  cambio  tecleas  los  dígitos 
nuevos. 

Recuerda  que  es  obligatorio  modificar 
dos  dígitos  a la  vez.  Es  decir,  una  vez 
tecleado  un  solo  dígito  hexadecimal,  hay 
que  teclear  el  segundo  antes  de  poder 
mover  el  cursor.  Esto  puede  parecer  un 
poco  pesado  pero  te  acostumbrarás 
rápido. 

Los  caracteres  ASCII  no  se  actualizan 
al  realizar  una  modificación.  Es  necesario 
volver  a cargar  el  bloque  una  vez  termi- 
nadas las  modificaciones  para  poder  ver 
los  cambios  realizados  en  el  formato 
ASCII. 

Cuando  terminas  de  hacer  los  cambios 
en  la  parte  1 del  bloque,  pulsa  la  tecla 
Return,  el  bloque  modificado  se  grabará 
en  el  disco  y la  parte  2 saldrá  en  pantalla. 
Al  completarse  la  segunda  parte,  vuelve  a 
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pulsar  la  tecla  Return;  el  bloque  será  gra- 
bado y se  pasará  automáticamente  al 
siguiente  bloque  en  orden  secuencial  (en 
vez  de  pasar  al  siguiente  bloque  del 
fichero). 

No  se  realiza  ningún  cambio  en  el  disco 
hasta  que  no  se  pulsa  la  tecla  Return.  Si, 
antes  de  pulsar  la  tecla  Return,  decides  no 
grabar  las  modificaciones  realizadas, 
pulsa  la  tecla  flecha  arriba.  (Esta  es  la 
tecla  que  lleva  la  flecha  arriba  y no  la 
tecla  de  cursor  arriba).  La  pantalla  será 
borrada,  tus  modificaciones  desaparece- 
rán, y el  programa  te  pedirá  otra  pista  y 
otro  sector. 

El  programa  “Editor  de  Discos  64" 
también  puede  ser  utilizado  para  leer  y 
examinar  tas  pistas  y los  sectores  del 
disco,  sin  tener  que  realizar  ningún  cam- 
bio. Siempre  que  se  pulsa  la  tecla  Return 
el  programa  avanza  al  próximo  sector  (y  a 
la  siguiente  pista  si  la  anterior  se  está  fina- 
lizando), o a la  segunda  parte  del  sector 
actual. 

Si  pulsas  la  tecla  Hecha  arriba,  el  pro- 
grama vuelve  a solicitar  la  pista  y sector. 
O si  no,  pulsando  la  tecla  F1  se  finaliza  el 
programa,  se  cierran  todos  los  ficheros,  y 
se  vuelve  al  modo  inmediato  de  Basic. 

Un  aviso;  al  probar  este  programa  por 
primera  vez,  no  lo  hagas  con  un  disco 
bueno.  Es  mejor  formatear  un  disco  nuevo 
y crear  unos  ficheros  falsos  para  la 
prueba.  Un  error  al  teclear  el  programa 
podría  resultar  en  la  destrucción  de  un 
bloque  entero,  y si  dicho  bloque  contiene 


la  cabecera  del  directorio  del  disco,  se 
podrían  perder  todos  los  ficheros  del 
disco. 

Para  que  esto  no  ocurra,  lee  el  pro- 
grama con  mucho  cuidado  y utilízalo 
para  realizar  unas  modificaciones  de  poca 
importancia  en  un  bloque  no  usado.  (Los 
bloques  no  usados  normalmente  contie- 
nen los  caracteres  hexadecimales  0 1 ). 
Graba  estas  modificaciones  en  disco, 
pasando  al  bloque  siguiente,  pulsa  la  tecla 
flecha  arriba,  y vuelve  a mirar  el  primer 
bloque  de  nuevo. 

Si  las  modificaciones  — y todo  lo 
demás,  excepto  los  caracteres  ASCII 
actualizados — siguen  igual,  significa  que 
el  programa  funciona  bien.  Si  no,  vuelve  a 
repasar  el  programa.  No  utilices  el  “Edi- 
tor de  Discos  64"  con  un  disco  bueno 
hasta  que  no  tengas  la  seguridad  de  que  lo 
hayas  tecleado  correctamente. 

Ejemplo 

A continuación  vamos  a ver  un  ejemplo 
de  cómo  funciona  el  programa.  Carga  el 
programa,  teclea  RUN,  c introduce  el 
disco  que  quieres  editar  en  la  unidad  de 
discos  0. 

En  general,  el  primer  bloque  que  se  exa- 
mina es  el  que  contiene  el  directorio: 
Pista  18,  Sector  1.  Esto  te  indica  todos  los 
ficheros  guardados  en  el  disco,  donde  se 
encuentran  y el  número  de  bloques  que 
ocupan. 

Consulta  el  capitulo  5 del  “Manual  del 
Usuario"  de  la  Unidad  de  Discos  1541 
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La  primera  portátil  electrónica  del  mundo  con  capacidad  de  TELECOMUNICACION 


• Terminal  lnput/Ouput. 

• CONECTABLE  A ORDENADOR  Interface  RS  232  C.  (incluido). 

• C'onectable  a otros  equipos  (impresoras,  máquinas  de  escribir,  etc.). 

• Teleimpresión  por  acoplador  acústico. 

• Pantalla. 

• Calculador  incorcoporado  con  impresión. 

• Gran  calidad  de  escritura. 

• Totalmente  silenciosa. 

opciones: 

Cables  de  conexión  para:  COMMODORE  64/VIC-20 

SINCLAIR  ESPECTRUM 
NEW  BRAIN,  etc.,  etc. 


TENGA  SU  IMPRESORA  Y MAQUINA  DE  ESCRIBIR  POR  EL  MISMO  PRECIO 
Esta  es  la  impresora  para  su  Commodore-64/VIC-20 
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para  saber  el  formato  especifico  del  alma- 
cenamiento de  datos.  Sin  embargo,  la 
información  contenida  en  el  manual  es,  a 
veces,  muy  confusa  y no  conviene  hacerle 
demasiado  caso,  usa  el  manual  simple- 
mente como  guía  para  tu  propia  explora- 
ción del  disco. 

Cuando  el  programa  te  pide  un  número 
de  pista,  teclea  1 8 (o  $ 1 2,  en  hexadecimal) 
y pulsa  Return.  Cuando  te  pide  un 
número  de  sector,  teclea  I (o  SOI  en  hexa- 
decimal) y pulsa  Return.  El  mensaje 
LEYENDO  PISTA  18  SECTOR  1 PARTE 
1 aparecerá  en  pantalla.  La  primera  mitad 
del  bloque  sale  en  pantalla  debajo  del 
mensaje. 

Se  pueden  leer  los  nombres  de  todos  los 
ficheros  almacenados  en  el  disco  en  el 
volcado  ASCII.  Los  tres  bytcs  hexadeci- 
males  que  aparecen  delante  del  primer 
byte  del  nombre  del  programa  son  muy 
importantes.  El  primer  byte  de  los  tres 
indica  el  estado  del  fichero,  de  acuerdo 
con  la  siguiente  tabla: 

$00  - Borrado  $83  - Usuario 

$81  - Sccucncial  $84  - Relativo 

$82  - Programa 

Cuando  empecé  a recuperar  mi  fichero 
"asesinado",  el  primer  problema  era 
transformar  el  byte  que  indica  el  estado 
del  fichero  del  primero  al  tercero  —es 
decir,  cambiar  el  "00"  del  fichero  borrado 
al  "82"  del  fichero  activo.  Con  el  pro- 
grama “Editor  de  Discos"  esta  operación 
es  muy  sencilla. 


Cuando  el  cursor  aparece  en  la  esquina 
superior  izquierda,  utiliza  las  teclas  del 
cursor  para  situarlo  encima  del  tercer 
byte  (que  debe  ser  00)  antes  del  nombre 
del  fichero  "asesinado”,  y teclea  el 
-número  82.  Como  por  arte  de  magia,  el 
fichero  será  resucitado  y devuelto  al 
directorio,  y puede  ser  cargado  como 
cualquier  otro  fichero,  siempre  y cuando 
ningún  fichero  nuevo  haya  sido  grabado 
encima. 

Los  siguientes  dos  bytcs  antes  del  nom- 
bre contienen  los  números  de  la  pista  y 
sector  del  bloque  donde  empieza  el 
fichero.  Si  quieres  mirar  un  fichero 
determinado,  apunta  estos  números,  pulsa 
la  tecla  flecha  arriba,  e indica  al  programa 
"Editor  de  Discos”  que  te  enseñe  este 
bloque.  (Recuerda  que  estos  números  de 
pista  y sector  son  representados  en  hexa- 
decimal, y deben  introducirse  con  el  signo 
S delante,  o traducidos  a decimal). 

Los  dos  primeros  bytes  de  un  fichero  de 
programa  contienen  los  números  de  pista 
y sector  del  siguiente  bloque  en  el  fichero. 
El  tercero  y el  cuarto  byte  contienen  — en 
orden  ascendente,  es  decir,  al  reves  del 
orden  normal  de  lectura — la  dirección  de 
carga  para  el  programa,  es  decir,  la  direc- 
ción de  memoria  donde  el  fichero  será 
almacenado  en  la  memoria,  si  se  ha  car- 
gado con  el  comando  LOAD  8,1.  (Para 
programas  en  Basic,  esta  dirección  nor- 
malmente es  $080 1,  la  dirección  por  falta 
para  todas  las  cargas  de  programas). 


Si  perdieras  la  dirección  SYS  para  un 
programa  en  lenguaje  máquina,  puedes 
emplear  el  programa  "Editor  de  Discos" 
para  localizar  la  dirección  de  carga,  dado 
que  la  dirección  del  SYS  y la  de  carga 
normalmente,  pero  no  siempre,  son  las 
mismas.  Si  quieres,  puedes  modificar  los 
bytes  para  cambiar  la  dirección  de  carga 
para  el  programa.  Sin  embargo,  recuerda 
que  la  mayoría  de  los  programas  en  len- 
guaje máquina  no  se  ejecutarán  correc- 
tamente si  cambian  de  posición. 

Los  bytes  restantes  del  fichero  contie- 
nen el  programa,  exactamente  de  la 
misma  forma  en  que  se  almacenó  en 
memoria.  Si  el  programa  está  en  Basic, 
esto  significa  que  todas  las  palabras  clave 
están  codificadas  — es  decir,  ocupan  un 
solo  byte — y cada  linca  de  la  programa- 
ción termina  en  cero  y va  precedida  por 
cuatro  bytes  que  indican  la  posición  de 
memoria  de  la  línea  siguiente  y el  número 
de  la  linca  actual. 

Cuando  terminas  la  exploración  o 
modificación  de  tu  disco,  y el  último  blo- 
que ha  sido  grabado  en  disco,  pulsa  F1  y 
volverás  al  modo  inmediato. 


Figura  1.  Sectores  por  pista. 


Número  de  pista 

1-17 

18-24 

25-30 

31-35 


Número  de 
Sector  Más  Alio 

20 

18 

17 

16 


I «35ti  PRINT CHRí< 14?>CHRí < 1 7>  "RERDING 
[ SPC  3 TRflCK  " T " [ SPC  J SECTOR  " S " C SPC  ] PlíRT 
"X+l  N=3 

355  CH=  1 ? '■  GOSUE700 

360  8$ < X > = " " ; PRINT#  15 , " IJ 1 " 5 , 0 ; T ; 3 

365  PRINT# 15, "B-P  "5,0 

370  I FX= 1 T HENF0R I = 1 T0 1 28  GE  I #5 . Hí  NE 

XT : GOTO380 

375  Bí  < 1 ’>  = " " 

330  FGRJ=0T0 1 5 DC= J#8+ 1 28*X  GOSUB450 
: PR 1 NT " 00 " HXí " [ 2SPC 1 " , FORK=0TG7 
390  GET#5 , Hí : Rí =CHRí < RSC < Rí+CHRí  0 ) ) 
> :Bf<X>=BíCX>+HÍ 

400  DC-RSC  Rí  ) • GOSUB450  • PR  I NTHXÍ  " 

C SPC : NEXT ; PR I NT " [ SPC ] " , FQRK=0TÜ7 
4 1 0 DC-RSC < M I Hí  < Bí  < X > , J*8+K.+ 1,1  ) +CHR 

í < 0 > > 

420  I F < DC>32RNDDC<  1 28  > ORDO  1 597  HENPR 
INTCHRí <DC >: ¡GOTO440 
430  PRINT"."; 

440  NEXT : PR I NT  NEXT  Bí < X ) = " [ SPC ] " +BÍ 

<X>  + " [SPC]"  RETURN 

450  D 1 = I NT ( DCX 1 6 > : H2=DC-H 1*16 

460  HXÍ =CHRf  < D 1 +48-7* < D 1 >9 ) +CHRÍ  < D2 

+48-7*  < D2>9  > > • RETURN 

470  HXÍ =R I GHTí < HXÍ , LEN ( HXÍ  > - 1>I FLEN 

< HXÍ  > =0THENHXÍ = " 00 " 

480  I FLEN C HXÍ  > = l THENHXí = " 0 " +HXÍ 
490  I FLEN  HXÍ  > >2 THENHXÍ =R  I GHTÍ  < HXÍ , 2 
’) 

500  F0R 1 = 1 T02 : Hí =M I DÍC HXÍ ,1,1 > 


505  I F Hí  " 0 " 0R  (. Rí> " 9 " RNDRÍ < " R " > ORRí  > 
" F " THENDC=0 : RETURN 

5 1 0 Kí=LEFT  í < HXÍ , 1 > ,fí=R  I GHTÍ  < HXÍ  . 1 > 

52Ú  Dt=RSCO<í.'-48  ■ D2*RSCUí)-48 : DC-«: 
D 1 1-7* < D 1 >9  > > * 1 6+  < D2+7* < »2>9 > ) : RETURN 
530  PR INTKí " C CRSRL ] " ; 

540  GET  Jí  : I F.JÍ= " " THEN540 

550  I F Jí< ” 0 " 0R < Jí> " 9 " RNIU í< " R " ) 0R Jí> 

"F"THEN540 

560  HXÍ=KÍ+JÍ : GOSUB520 

570  Bí ■:  X>=LEFTÍCBÍ<X) , L*S+C+1  )+CHRí< 

HC  +R I GHTí  < Bí  < X > , LEN  < Bí  < X > ) - < L*8+C+2 

;•  ) 

580  6OTO230 

590  Bí  < X > =M  I Dí  •:  Bí  < X > , 2 , LEN  •:  Bí  < X > > -2 ) 

600  PR I NT# 1 5 , " B-P : " 5 , 0 

610  PR  I NT #5 , Bí  '■  0 > ; Bí  < 1 > i 

620  PR  I NT#  1 5 , "LJ2  : " 5 ; 0 , 7 S 

630  I FX=0THENX= 1 : G0T 0 1 00 

640  X=0  GOSUB650 : GOTO 1 00 

650  S=S+ 1 ■ I FS<=SX  < T 1 THF.NRETURN 

660  3=0  T=T+1  IFTC36THENRETIJRN 

670  7=1  RETURN 

680  FOR I = 1 T0 1 7 : SX  < I > =20 : NEXT  FOR I = 1 8 
T 024  ' SX  '■  I > = 1 8 NEXT 

690  FOR I =25TO30 : SX  < 1 ) = 1 7 : NEXT : FOR I =3 

1 T 035 • SX  < I > = 16 : NEXT  = RETURN 

700  FOR  1 1 = 1 TON  PR  1 NTCHRÍ 1 CH  > NEXT  R 

ETURN 

FIN 
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MANUAL 
DEL  MONITOR  DE 
CODIGO  MAQUINA 
PARA  EL  C-64 
HES-MON  (I) 


HES-MON  64  es  un  Monitor  de  Len- 
guaje Máquina  (Machine-l.anguage  Moni- 
tor). El  MLM  sirve  básicamente  para 
alterar  el  contenido  de  los  bytes  de 
memoria,  leerlos  y grabarlos  sobre  perifé- 
ricos (cassette  o disco)  y ordenar  la  ejecu- 
ción de  un  programa  en  código  máquina 
existente  en  RAM.  IIES-MON  64,  ade- 
más de  estas  funciones,  incorpora  otras 
como  el  desensamblado  del  código  máquina 
en  assemblcr.  programación  en  lenguaje 
ensamblador  directamente  sobre  la  RAM 
(sin  manejo  de  etiquetas),  rellenado  de 
porciones  de  RAM  con  un  carácter,  relo- 
catación  de  programas  o tablas  en  código 
máquina  de  un  lugar  a otro  de  la  RAM 
actualizando,  o no,  las  direcciones  de  las 
bifurcaciones  absolutas  (JMP  y JSR), 
asignación  de  puntos  de  ruptura  en  los 
lugares  que  interese  de  rutinas  en  código 
máquina,  posibilidad  de  ejecutar  progra- 
mas en  código  máquina  “paso  a paso", 
visualizando  en  la  pantalla  el  comando  en 
assemblcr  que  es  está  ejecutando,  etc. 
Como  se  ve,  es  una  herramienta  vital  para 
el  que  hace  sus  programas  en  código 
máquina,  lenguaje  cuya  depuración  seria 
tarea  ardua  y difícil  si  no  fuera  por  utilita- 
rios como  éste.  Es  necesario  aclarar  para 
aquellos  de  nuestros  lectores  que  no 
conozcan  a fondo  la  programación  en 
código  máquina  que  aunque  este  cartu- 
cho permite  entrar  programas  en  el  lenguaje 
propio  del  microprocesador  no  sustituye 
a un  assembler  para  generar  grandes  y 
complejos  programas,  sino  que  más  bien 
lo  complementa  al  facilitar  las  tareas  de 
"puesta  en  marcha"  de  programas  escri- 
tos con  otros  compiladores.  Otra  de  sus 
utilidades  es  la  de  permitir  el  desarrollo 
de  pequeñas  rutinas  en  código  máquina 
que  sustituirán  a segmentos  de  BASIC  en 
lugares  donde  el  tiempo  de  ejecución  sea 
crítico. 


Activación 

HES-MON  64  está  contenido  en  un 
cartucho  que  deberá  conectarse  en  el  port 
de  expansión  del  COMMODORE  64. 

Se  activa  automáticamente  al  dar  ten- 
sión al  ordenador. 

Desde  su  activación  visualiza  el  valor 
de  los  registros  del  microprocesador,  con- 
tador de  programa  (PC),  acumulador, 
índices  X e Y,  y puntero  del  stack. 

Por  ejemplo: 

HESMON  2.0 
BY  T.M.  PETERSON 
(C)  1983  H.E.S. 

C* 

PC  IRQ  SR  AC  XR  YR  SP 
; 0000  EA3I  27  00  00  05  HA 

Los  valores  de  cada  uno  de  los  regis- 
tros pueden  variar  dependiendo  del 
momento  en  que  se  active  el  HES  MON 
64. 

Una  vez  activado,  quedan  habilitados 
todos  los  comandos  que  posee,  que  se 
describen  en  las  páginas  siguientes. 

Comandos  del  HES-MON  64 

A continuación  se  describen  los  coman- 
dos del  HES  MON  64: 

A.  — (Simple  Assembler).  Introducción 
de  programas  en  lenguaje  ensamblador 
directamente  sobre  RAM. 

B.  — (Break  Set).  Asigna  "breaks"  (pun- 
tos de  ruptura)  en  lugares  concretos  del 
programa  para  que  la  ejecución  se  inte- 
rrumpa al  pasar  cierto  número  de  veces 
por  ellos. 

D.  — (Disassembler).  Visualiza  el  con- 
tenido en  código  máquina  de  la  RAM  o 
de  la  ROM. 

E.  — (External  Relinker).  Permite  la 
conversión  automática  de  direcciones 
para  adaptar  programas  de  otras  máqui- 
nas al  CBM-64. 


F.  — (Fill  Memory).  Rellena  porciones 
de  memoria  con  cierto  contenido. 

G.  — (Go  Run).  Inicia  la  ejecución  de 
programas  en  código  máquina  a partir  de 
una  dirección  concreta. 

H.  — (Hunt  Memory).  Busca  valores 
concretos  a lo  largo  de  la  zona  de  memo- 
ria indicada. 

L— (Intcrpret  Memory).  Visualiza  el 
contenido  de  la  memoria  en  hexadecimal 
y en  caracteres  ASCII. 

L. — (Load).  Carga  en  RAM  programas 
contenidos  en  disco  o cassette. 

M. — (Memory  display).  Visualiza  el 
contenido  de  la  memoria  en  hexadecimal. 

N. — (New  Locator).  Traslada  código 
máquina  o tablas  de  un  lugar  a otro  de  la 
memoria. 

O.  — (Output  Divert).  Desvía  la  salida 
de  pantalla  a otro  periférico;  p.c.  impre- 
sora o disco. 

P.  — (Print  Screen).  Efectúa  una  copia  del 
contenido  de  la  pantalla  en  la  impresora. 

Q.  — (Quick  Trace).  Ejecuta  un  pro- 
grama a partir  de  la  dirección  indicada. 
Permite  interrumpir  la  ejecución. 

R.  — (Register  Display).  Visualiza  el 
contenido  de  los  registros  del  mismo  modo 
que  cuando  se  activa  el  HES-MON  64. 

S.  — (Save).  Graba  el  contenido  de  la 
memoria  sobre  disco  o cassette. 

T.  — (Transfer  Memory).  Transfiere  con- 
tenido de  memoria  de  un  lugar  a otro  de 
la  RAM. 

U.  — (Test  Color  RAM).  Ejecuta  un  test 
de  la  RAM  de  color. 

V.  — (Verify  RAM).  Ejecuta  un  test  de 
un  bloque  de  memoria  RAM. 

W.  — (Walk  Mode).  Ejecuta  “paso  a 
paso"  un  programa  en  código  máquina. 

X.  — (Exit  to  Basic).  Sale  del  HES 

MON  64  y retorna  al  Basic.  El  HES- 
MON  64  puede  activarse  de  nuevo  pul- 
sando la  tecla  RESTORE.  ^ 
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^ II. — (Decimal  to  Hex).  Efectúa  la  con- 

versión decimal  a hexadecimal. 

S. — (Hex  to  Decimal).  Efectúa  la  con- 
versión de  hexadecimal  a decimal. 

+. — (Hex  Addition).  Efectúa  una  suma 
hexadecimal. 

-.—(Hex  Subtraction).  Efectúa  una 
resta  hexadecimal. 

Descripción  de  los  comandos 

En  las  páginas  siguientes  se  describe  el 
manejo  de  los  comandos  HES  MON  64. 

En  los  ejemplos  que  se  pongan,  la  equis 
minúscula  (x)  indica  la  posición  del  cur- 
sor. Lo  que  el  operador  debe  escribir  se 
indica  subrayándolo. 

Asimismo,  los  ejemplos  están  expues- 
tos como  si  la  CPU  estuviera  en  caja  alta 
(mayúsculas/gráficos);  lógicamente,  si 
desea  trabajar  con  caja  baja  (minúsculas/- 
mayúsculas),  deberá  escribir  en  minúscu- 
las lo  que  se  muestra  en  mayúsculas. 

Los  comandos  del  HES  MON  64  sólo 
funcionan  cuando  el  HES  MON  64  está 
activado.  Su  formato  consiste  en  una  letra 
o un  símbolo,  que  identifican  al  comando, 
seguida  de  los  parámetros.  Entre  el 
comando  y los  parámetros  tiene  que 
haber  un  espacio.  Los  parámetros  deben 
introducirse  en  formato  hexadecimal  de 
cuatro  dígitos  sin  el  signo  dólar  (S)  que 
normalmente  identifica  las  notaciones 
hcxadecimalcs  (0400,  B000.08FA,  FCCO, 
000C..,)  a excepción  de  los  comandos 
F1LL  MEMORY  y HUNT  MEMORY 
que  utilizan  también  parámetros  de  un 
byte  (dos  dígitos  hcxadecimalcs:  00,  0B, 
12,  FF...)  como  se  indica  en  su  descrip- 
ción correspondiente.  Los  comandos 
LOAD  y SAVE  utilizan  nombres  de  pro- 
grama; estos  deben  ser  de  un  máximo  de 
16  caracteres  y deben  estar  encerrados 
entre  comillas  ("NOMBRE  PRG”,  "O: 
NOMBRE",  “1:  PEPE"...).  El  comando 
SIMPLE  ASSEMBLER  emplea  lenguaje 
ensamblador;  en  este  caso  se  aplicarán  las 
reglas  del  assembler. 

Si  el  HES-MON  64  no  entiende  un 
comando  por  estar  mal  expresado,  bien  lo 
ignora,  o bien  visualiza  un  interrogante 
(?)  en  la  posición  donde  aproximada- 
mente se  encuentra  el  error.  El  operador 
puede  escribirlo  de  nuevo  en  otra  línea,  o 
bien  corregir  la  anterior.  Si  prueba  a eje- 
cutar un  comando  ilegal,  como  salvar  el 
propio  cartucho  en  un  disco  o cinta,  tam- 
bién le  dará  como  resultado  el  interro- 
gante. 

A Ensamblado  sencillo 

Introducción  de  programas  en  lenguaje 
ensamblador  directamente  sobre  memo- 
ria. Por  ejemplo,  queremos  introducir  en 
la  posición  $3000  (12288  en  decimal)  el 
siguiente  programa: 

INICIO  LDXtfSOO 
LDA#$A0 
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LOOP  STA  $8000,  X 
INX 

BNE  LOOP 
BRK 

En  primer  lugar  introduciremos  la  pri- 
mera linea: 

. A 3000  LDX  S$00 

• Al  pulsar  RETURN,  puesto  que  el 
HES-MON  64  acepta  la  sintaxis  como 
correcta,  traduce  la  línea  a código 
máquina  dejándola  de  la  siguiente  manera: 

. A 3000  A2  00  LDX  «$00 

. A 3002  x 

(x=posición  del  cursor) 

Para  introducir  la  siguiente  línea  no 
hace  falta  indicar  el  byte  donde  debe  ubi- 
carse, pues  ya  lo  calcula  automáticamente 
el  HES  MON  64.  Por  tanto,  ahora  intro- 
duciremos la  línea  siguiente: 

• A 3002  LDA  «$A0 

Que  el  HES-MON  64  convierte  en: 

. A 3002  A9  A0  LDA  «SAO 

• A 3004  x 

Y así  sucesivamente  hasta  introducir  el 
programa  completo,  que  una  vez  hecho 
tendrá  el  siguiente  aspecto: 

• A 3000  A2  00  LDX«$00 

• A 3002  A9  A0  LDA  c$A0 

• A 3004  8D  00  80  STA  S8000.X 

• A 3007  E8  INX 

• A 3008  DO  FA  BNE  $3004 

• A 300A  00  BRK 

• A 300 B 

• X 

Para  salir  del  modo  SIMPLE  ASSEM- 
BLER se  ha  pulsado  RETURN  cuando  el 
cursor  estaba  en  la  posición  $300B. 
Nótese  que  en  lugar  de  "BNE  LOOP" 
hemos  tenido  que  poner  “BNE  S3004", 
pues  el  SIMPLE  ASSEMBLER  no  per- 
mite las  etiquetas. 

B Colocar  puntos  de  ruptura 

Comando  para  situar  un  punto  de  rup- 
tura (break-point)  en  un  byte  determi- 
nado, para  que  la  ejecución  del  programa 
se  detenga  en  este  punto  cuando  haya 
pasado  un  determinado  número  de  veces 
por  él.  Un  punto  de  ruptura,  es  una  marca 
indicadora  de  que  la  ejecución  del  pro- 
grama en  código  máquina  debe  interrum- 
pirse para  pasar  el  control  al  MLM,  o en 
este  caso  al  HES  MON  64. 

Por  ejemplo: 

• B 1000  00FF 

El  programa  se  interrumpirá  cuando 
haya  pasado  255  veces  ($FF)  por  la  posi- 
ción de  memoria  $1000 

• BIOOO 

El  programa  se  interrumpirá  cuando 
pase  por  la  dirección  S1000  (una  sola  vez). 

C Comparación  de  bloques  de 
memona 

Este  comando  compara  dos  bloques  de 
memoria  y notifica  todas  las  diferencias 
que  encuentra. 

Por  ejemplo: 

•C  lili  2222  3333 


Donde  lili  es  la  primera  dirección  de 
la  primera  sección,  2222  es  la  última 
dirección  de  la  primera  sección  y 3333  es. 
la  dirección  donde  empieza  la  sección  que 
se  comparará  con  la  primera.  Este 
comando  se  puede  detener  (en  el  caso  de 
que  se  impriman  muchas  direcciones)  con 
la  tecla  STOP. 


D Desensamblar 

Visualiza  una  sucesión  de  direcciones 


junto  con  el  contenido  de  sus  bytes  en 
hexadecimal,  y su  equivalente  en  código 
máquina. 

Por  ejemplo: 

. D 3000  300B 

Provocaría  (es  un  ejemplo)  el  siguiente 
desensamblado: 


.,  3000  A 2 00 
.,  3002  A9  A0 
.,  3004  8D  00  80 
.,  3007  E8 
.,  3008  DO  FA 
.,  300A  00 


LDX  «$00 
LDA  «SAO 
STA  $8000, X 
INX 

BNE  $3004 
BRK 


.x  300 B 

Pueden  modificarse  directamente  los 


bytes  en  hexadecimal:  el  HES  MON  64 
desensamblará  la  linea  de  nuevo.  Por 


ejemplo,  para  cambiar  el  valor  $8000  de 
la  dirección  $3004  por  el  valor  $8150: 

La  manera  es  modificando  el  texto  en 
assembler,  es  decir... 

. A 3004  9D  00  80  STA  $8150,  X 
Y al  pulsar  RETURN  el  HES  MON  64 
actualizará  los  bytes  en  hexadecimal: 

. A 3004  9D  50  81  STA  $8150,  X 


Si  al  desensamblar  no  se  especifica 
dirección  final  (segundo  parámetro)  el 
HES-MON  64  desensamblará  hasta  el 
final  de  la  memoria  (SFFFF)  o hasta  que 
se  pulse  la  tecla  STOP 


E Enlace  externo 

Este  comando  facilita  la  adaptación  de 
programas  en  CODIGO  MAQUINA  de 
otras  máquinas  para  el  COMMODORE 
64.  Exactamente  este  comando  cambia  las 
llamadas  al  sistema  operativo  del  pro- 
grama fuente  por  las  llamadas  propias  del 
sistema  operativo  del  COMMODORE 
64.  La  tabla  generada  contiene  parejas  de 
direcciones  que  ejecuten  en  ambos  siste- 
mas operativos  tareas  similares. 

Por  ejemplo: 

• E 1200  13FF  1000  B000  FF(K) 

Los  2 primeros  parámetros  son  el  inicio 
y el  fin  del  programa,  el  tercero  es  el  inicio 
de  la  tabla  de  direcciones  y los  dos  últi- 
mos son  el  rango  de  las  direcciones  en  las 
que  queremos  hacer  cambios. 

f=  llenar  la  memoria 

Rellenado  de  una  zona  de  memoria  con 
un  carácter  o valor  determinado.  Por 
ejemplo: 

. F 1000  1 100  FF 

Asigna  e^  valor  255  ($FF)  a todos  los 
bytes  comprendidos  entre  $1000  y 1100 
(4096  y 4352  en  decimal),  ambos  inclusive» 


SEGUNDA  Y ULTIMA  PARTE 

MANUAL 

DEL 

SUPER 

EXPANDER 


VIC-20 


RPEN(x) 

Lee  la  coordenada  de  pantalla  del  lápiz  óptico.  Si  x=0  lee  la 
coordenada  X,  y si  x=l,  lee  la  coordenada  Y. 

EJEMPLO:  X=RPEN(0) 

RJOY(x) 

Lee  el  valor  del  joystick.  La  variable  x debe  estar  entre  0 y 255, 
y su  valor  es  irrelevante. 

EJEMPLO:  10  GRAPIIIC2:COLORI  1,6,6.6:X=I70:Y=170 

20  J=RJOY(0) 

30  X=X+((JAND4)=4H(JAND8)=8) 

40  Y=Y+((JAND1)=1H(JAND2>=2) 

50  POINT3,X*3,Y*3:IFJ=l28THEN:SCNCLR 
60  GOTO20 

RSND(x) 

Lee  el  valor  de  cualquiera  de  los  registros  de  sonido,  depen- 
diendo del  valor  de  x según  esta  tabla: 

_x^  Registro  de  sonido 

1 sonido  I 

2 sonido  2 

3 sonido  3 

4 sonido  4 

5 volumen 

3.  ESCRIBIENDO  MUSICA  CON 
EL  SUPER  EXPANDER 

El  modo  de  escribir  música  de  SUPER  EXPANDER  le  permite 
a usted  el  poder  tocar  notas  sólo  tocando  las  teclas  en  el  teclado 
o,  de  una  forma  más  fácil,  usando  la  sentencia  PRINT  en  sus 
programas  BASIC.  Es  gobernado  por  interrupción,  lo  que  per- 
mite al  programa  tocar  música  mientras  está  realizando  otras 
tareas.  Está  pensando  principalmente  para  tocar  música,  en  lugar 
de  efectos  de  sonido,  lo  que  le  permite  escribir  melodías  mucho 
más  fácilmente. 


El  modo  musical  es  introducido  pulsando  la  tecla  CTRL  y la 
flecha  a la  izquierda  ( — ) al  mismo  tiempo.  Cuando  usted  lo  hace 
en  un  programa  le  aparece  una  "f  inversa".  Este  es  un  signo 
especial  que  le  dice  a usted  dónde  tiene  la  música  en  su  programa. 
A partir  de  este  momento,  cualquier  tecla  que  toque  será  inter- 
pretada de  forma  musical,  hasta  que  usted  pulse  la  tecla 
RETURN.  He  aquí  los  caracteres  del  modo  musical: 


Carácter  Efecto 


P 

Q 

V 

s 

o 

T 

R 

C,  D,  E,  F,  G, 
A,  B 
tt 
$ 

RETURN 


conecta  el  eco  de  pantalla 
desconecta  el  eco  de  pantalla 
selección  de  volumen 
selección  de  registro  de  sonido 
selección  de  octava 
selección  de  tempo 
espera  el  primer  compás 

toca  la  nota 

toca  la  siguiente  nota  sostenida 
toca  la  siguiente  nota  bemol 
finaliza  el  modo  musical. 


Cuando  imprima  cadenas  de  estos  caracteres,  el  punto  y coma 
(;)  puede  ser  usado  para  impedir  que  el  carácter  RETURN  acabe 
con  el  modo  musical. 

El  eco  de  pantalla  está  generalmente  desconectado.  Cualquiera 
de  los  caracteres  reconocidos  por  la  caja  de  música  no  es  mos- 
trado en  la  pantalla.  No  obstante,  cuando  el  eco  de  pantalla  está 
conectado,  sí  que  son  mostrados. 


Alguna  de  las  letras  aceptadas  por  el  modo  musical  deben  ir 
seguidas  por  un  dígito.  He  aquí  una  tabla  de  esas  letras  y de  sus 
números  asociados: 


Letra 

Números 

Valor  de  los  números 

V 

0 a 9 

0 es  volumen  bajo,  9 es  volumen  alto 

S 

1 a 4 

número  de  altavoz 

O 

1 a 3 

1 es  bajo,  3 es  alto 

T 

0 a 9 

tempo 
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El  lempo  es  seleccionado  según  esta  tabla: 

Número  Compases  Duración  de  la  nota 

de  tempo  por  minuto  tiempo  1/68  segundos 


0 

900 

4 

1 

600 

6 

2 

450 

8 

3 

300 

12 

4 

225 

16 

5 

150 

24 

6 

112.5 

32 

7 

56.25 

64 

8 

28. 

128 

9 

14. 

255 

Cada  registro  de  sonido  tiene  3 octavas  completas  a su  alcance. 
No  obstante,  ya  que  el  registro  2 es  una  octava  más  alta  que  el 
registro  l,  las  tres  octavas  son  diferentes.  Cuando  toque  notas  en 
diferentes  sonidos  de  registro,  asegúrese  de  que  lás  octabas  sean 
escogidas  correctamente. 

He  aqui  algunos  ejemplos  de  cadenas  que  tocan  música  (el 
símbolo  f invertida  se  logra  apretando  la  tecla  CTRL  y la  tecla  de 
flecha  a la  izquierda  al  mismo  tiempo). 

4.  TECLAS  DE  FUNCIONES 
PROGRAMABLES 

Hay  8 funciones  a las  cuales  se  puede  acceder  con  las  teclas  de 
función  y la  tecla  SH1FF.  Estas  teclas  están  preasignadas  según  la 
siguiente  tabla: 

Tecla  Graphic 

TÍ  GRAPHIC 

f2  COLOR 

f3  DRAW 

f4  SOUND 

f5  CIRCLE 

f6  RUN  + RETURN 

Í7  POINT 

f8  LIST  + RETURN 

Toda  vez  que  usted  pulse  estas  teclas,  los  caracteres  para  los 
cuales  están  programados  entrarán  en  su  programa  del  mismo 
modo  que  si  usted  las  hubiese  tecleado.  Cada  tecla  puede  ser 
programada  hasta  con  128  caracteres,  usando  el  comando  KEY. 

KEY 

o 

KEY  n,  “string” 

La  palabra  KEY  hace  que  el  VIC  le  muestre  una  lista  de  todos 
los  valores  actuales  de  las  teclas  de  función.  Esto  está  formateado 
en  la  pantalla  por  lo  que  el  contenido  de  las  cadenas  puede  ser 
cambiado  moviendo  el  cursor  hasta  la  cadena  deseada,  haciendo 
los  cambios  oportunos  y apretando  RETURN,  como  si  de  un 
programa  normal  se  tratara.  Usted  puede  cambiar  cualquier  tecla 
en  el  KEY  MENU  cambiando  la  información  dentro  de  las  mar- 
cas de  señal  y tecleando  RETURN  o tecleando  el  comando  KEY 
usando  el  formato  explicado  en  el  ejemplo  de  abajo. 

Cuando  sea  seguido  por  un  número,  este  comando  cambia  el 
valor  de  la  cadena  por  el  nuevo  valor.  Este  puede  ser  hasta  de  128 
caracteres,  incluyendo  los  controles  de  cursor  y de  color,  el 
RETURN  (CHR$(  13)),  o cualquier  otro  carácter.  Las  teclas  pue- 
den ser  cambiadas  también  desde  el  control  de  programa. 

EJEMPLO:  KEY  I,  "NO  ES  MARAVILLOSO?" 


5.  3K  EXPANSION  DE  MEMORIA 

Cuando  se  use  el  cartucho  de  3K  para  expandir  la  memoria  del 
VIC-20,  el  área  del  programa  BASIC  es  cambiada,  y pasa  a 
empezar  en  la  localización  1024  ($0400). 

Advierta  que  con  el  cartucho  de  3K  conectado,  sólo  la  memo- 
ria que  está  en  el  cartucho  (4096-8191  ó S1000-1FFF)  puede  ser 
usada  para  la  pantalla  del  VIC  y para  las  áreas  de  gráficos  de  alta 
resolución. 


TRES  EJEMPLOS  DE  PROGRAMAS  SUPEREXPANDER 


Programa  1 

5 REN  TRIO  PLÜT  DEMO 

10  ijíRñRH  I C2 

11  SCNCLR 

1 5 SC* I NT  < RND < 1 ) * 1 6 ) : CH= I NT  < RND ' 1 • #8 

) : IFSOCHTHEN15 

20  CGLORSC , SC , CH  , 1 

30  RM*RND < 1 > *400+ 1 00 

40  FR=RND<1># 100+50 

50  RD=RND< 1 )*ff*2 

60  Tfl=INT (RND< 1 )+. 3) 

70  I FTA= 1 THENRN=RND < 1 > * 1 00+50 : TR=RND 
< 1 >*200+50 : CT=INT(RNIK  1 > + .5) 

80  X=0 : GOSUB200 
30  DRRW1  , X,  V : Y0*V 
100  F ORX= 1 0TO 1 024STEP20 
110  G0SUB200 

1 20  I FRES  < V-V0 > >600THEN : DRRW t , X , V 
130  DRRW  1 TOX  .■  V : V0*V 
140  HEXT 

150  FORX* 1 TO2000 : NEXT 
160  RUN 

200  V=RM*S I N < X/FR+RD > ZOOS ( T R* ( X/FR+R 

D>  > : I FOT = 1 THENV=-V 

2 1 0 V=5 1 2+V : I FV<0THENV=0 

220  I FV> 1 023THENV* 1 023 

230  RETURN 


Programa  2 

5 REN  3-D  PIRAMIDE 

1 0 GRRPH I C2 : COLORO ,7,1,12 

20  FOR I = 1 T 05 : REAIiX  <I>,  V < I > , i < I > : NEXT 
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100  FOR 1=1 TOS 
105  VV<I>=V(I> 

ii0  xxa>=xa> 
ni  zza>=za> 

1 20  PÜ I WT2 , 500+  < 200*XX ■ I > > X < VV ( I > +20 
0 > , 500 

130  NEXT : XC=0 : VC=220 
160  A=A+20:R=fl/57.29 
165  F0RI=1T05 

1 70  xx  a > = ( x a > -xc  > *cos  < r > + < v a > -ve  > 

♦S I N < R > +XC 

1 80  VV  < I > = < V < I > - ve  ) #COS  < R + < X < I > -XC  > 
*SIN(R>+VC+100 

1 85  AX < I > = < 300#XX < I > >X < VV < I > +300 > +50 

0 : ñv  ( i > = <:  .300*zz  a > > / < vv  < i > +300  > +500 

190  NEXT 

191  SCNCLR 
195  F0RI=1TQ4 

200  DRRW2 , AX < 5 > , RV  < 5 ) TOflX < I > , AV  < I ) 
210  NEXT 

220  DRAW2  • AX  •:  1 ) , AV  < 1 > TOflX  < 3 > , flV  < 3 > 

22 1 DRAW2 , flX  < 3 > , flV  ( 3 ) TOflX  <A>.  flV  < 4 > 

222  DRAW2 , AX < 2 ) , flV ( 2 ) TOflX < 1 > • flV < 1 ) 

223  DRAW2 , flX  < 2 > , flV < 2 > TOflX < 4 > , fl V < 4 > 
990  GOTO 160 

1 000  DAT A-200 , 20 , 1 90 , -200 , 420 , 1 90 , 20 
0 , 20 , 1 90 . 200 , 420 , 1 90 . 0 , 220 ..  -800 


Programa  3 

5 REM  GRflPHIC  DE 00 

6 REM  KINETIC  STRING  ART  ADAPTED  FRi  i 
M BVTE  HRT I OLE 

8 REM  NECESITA  AMPLIACION  DE  MEMORIA 
DE  16K 
10  ÜRAPHIC2 
20  COLORO, 0.5, 5 
30  FORL=0T O50OSTEP40 
40  CIRCLE2, 51 1 , 51 1 , L, 500-L 
50  NEXT 
55  GOSUB900 
60  QaRNDÍ 1 )/2+. 25 
70  E‘uRL=0T O500STEP4O 
80  C I RCLE2 , 5 1 1 , 5 1 1 , L , 50O-L*Q 
90  NEXT 
100  GOSUB900 
110  Q*RND< 1 >/2+. 25 
120  FORL=0TO50OSTEP40 
1 30  C I RCLE2 ,511,511, L*Q , 500-L 


140  NEXT 

150  GOSUB900 

220  FORL=0TO2*trSTEPff/25 

230  C I RCLE2 ,511 +400*S I N < L ) , 5 1 1 +4O0*C 

OS  < L ) , 75 , 100 

240  NEXT 

250  GGSUB900 

260  FORL=0TO2#irSTEPir/50 

270  C I RCLE2 ,511 +400*S I N < L > , 5 1 1 +400#C 

0S(L)X<L+1>, 75-L* 1 0 , 10O-L*13 

280  NEXT 

290  GOSUB900 

300  GRAPHIC1 • DI MAX <200, 3> : F0RL=1 TOS • 
SC=  I NT  c.  RND  C 1 > *8  > 

30 1 BO* I NT  < RND  <1 > * 1 6 ) : I FBO-SCTHEN30 1 

302  CH= I NT  c RND < 1 > *8 ) : I F < CH=SC  > OR < CH= 
BO)THEN302 

303  AIJ=  I NT  < RND  < 1 >*  1 6 > : I F < AU=SC  > OR  < AU 
=B0 ) OR  < AU=CH  > THEN303 

304  COLORSC , BO , CH , AU 

310  X= I NT  < RND < 1 > * 1 024  > : V= I NT  < RND ( 1 ># 
1 024 ) ; X 1 = I NT  < RND  < 1 > # 1 024  > 

315  V 1 = I NT  < RND  < 1 > * 1 024 ) 

320  C1=0 : C2=0 
330  FORM=0TO200 

340  IFC1<1THENC1“5+INT <RND< 1 >*10) : RE 
= I NT  < RND < 1 > *3 ) + 1 

350  I F C2< 1 THENDX= I NT  < RND  < 1 >*81 >-40 : D 
V= I NT  < RND  <1 > *8 1 > -40 : DA* I NT  < RND  < 1 > *8 1 
>-40 

355  I FC2< 1 THENDB* I NT < RND < 1 > *8 1 > -40 : C 
2= 1 5+ 1 NT ( RND  < 1 > * 1 0 > 

360  X=X+DX • V=V+DV : X 1 =X 1 +DA : V 1 =V 1 +DB 

361  I F < X<0 > OR  < X> 1 023 > THENDX=-DX : X=X+ 
DX*2 

362  I F < V<0 >0R< V> 1 023 > THEHDV=-DV : V=V+ 
DV*2 

363  I F < X 1 <8  > OR < X 1 > 1 023  > THENDA=-DA : X 1 
=X1+DA*2 

364  I F C V 1 <0  > OR  < V 1 > 1 023  > THENDB—DB  : V 1 
=V1 +DB*2 

365  C 1 =C 1 - 1 :C2*C2-1 

370  DRAW0 , AX < M , O > , AX < M , 1 > T OAX < M , 2 > , A 
X < M , 3 > 

380  DRflWRE , X , VTO 1 , V 1 flX < M , 0 > =X : AX  < M , 
1 > =V : AX  < M , 2 > =X 1 : AX < M , 3 > =V 1 
390  NEXT  NEXT 
400  GOSUB90O 

899  GRAPHI C4  : COLOR  1 , 3,6,  6 ■ PR I NT  "ESF'E 
RO  [ SPC  ] QUE  C SPC  ] LE  C SPC  J HABRA  í SPC  .1 GUST 
ADO [ SPC 3 EL [ SPC ] SHOW ! " : GOSUB90O  RON 

900  FORD*  1 T 02000  NEXT  : SCNCLR  : RETIJRN 
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SEGUNDA  PARTE 


EL  CHIP  DE  VIDEO 
DEL  COMMODORE-64 

En  este  artículo  acabaremos  de  ver  los  registros  del  chip  de  vídeo 

Por  R.  PARDO 


REGISTRO  23 
(Posición  53271  - SD017) 

Es  el  registro  de  expansión  vertical  de 
los  Spritcs.  El  bit  0 provocará  la  expan- 
sión vertical  del  Spritc  0,  el  bit  1 hará  lo 
mismo  con  el  Sprite  1 y así  sucesivamente. 
La  expansión  será  efectiva  poniendo  el 
correspondiente  bit  a 1 (0=tamaño  nor- 
mal, l=tamaño  expandido). 

REGISTRO  24 
(Posición  53272  - SD018) 

Es  un  registro  de  control  de  memoria 
del  chip  de  vídeo.  Analizaremos  el  conte- 
nido de  este  registro  a continuación: 

Bits  7-4:  Es  la  dirección  de  base  de  la 
matriz  de  vídeo.  La  matriz  de  video  es  un 
área  de  memoria  de  1000  bytes  consecuti- 
vos los  cuales  contienen  un  puntero  de 
carácter  de  8 bits.  Lo  diré  en  otras  pala- 
bras: se  trata  de  la  dirección  de  base  de  la 
memoria  de  pantalla  y los  punteros  de 
carácter  a los  cuales  me  refiero  son  los 
códigos  POKE  que  sitúa  de  manera 
automática  el  chip  de  vídeo  cuando  escri- 
bimos o cuando  hacemos  PRINT  o 
POKE  en  la  pantalla.  Normalmente  está 
situada  a partir  de  la  posición  1024 
($0400). 

Bits  3-1:  Es  la  dirección  de  base  del  área 
de  memoria  donde  se  almacena  la  forma 
de  los  caracteres.  Aquí  están  contenidos 
los  tres  bits  más  significativos  de  la  direc- 
ción de  base  del  generador  de  caracteres. 
Los  8 bits  de  orden  más  bajo  están  for- 
mados por  el  puntero  de  carácter  en  la 
matriz  de  vídeo,  que  seleccionan  a un 
carácter  determinado,  y a un  contador  de 
3 bits  ráster  que  selecciona  uno  de  los  8 
bits  de  carácter  (hablaremos  más  a fondo 
de  este  tema  cuando  toquemos  los  carac- 
teres definidos  por  el  usuario).  Los  carac- 
teres resultantes  se  formatean  en  una  pan- 
talla de  25  filas  por  40  columnas.  Además 
hay  un  nyble  (medio  byte)  de  COLOR 
que  está  asociado  con  cada  puntero  en 
cada  posición  de  la  memoria  (la  memoria 
de  la  matriz  video  debe  ser  de  una  longi- 
tud de  12  bits)  lo  cual  define  uno  de  los 
dieciséis  colores  para  cada  carácter. 

Bit  0:  No  se  utiliza. 
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REGISTRO  25 
(Posición  53273  - SD019) 

Este  es  el  registro  de  estado  de  inte- 
rrupciones. Aquí  se  muestra  el  estado  de 
las  cuatro  fuentes  de  interrupciones.  Pero, 
¿qué  es  una  interrupción?  Si  estamos  eje- 
cutando una  tarea  (por  ejemplo  jugando  a 
marcianos  con  nuestro  ordenador)  y a 
nuestra/o  novia/o  se  le  ocurre  llamarnos 
por  teléfono  para  darnos  los  buenos  dias, 
el  hecho  de  esta  llamada  nos  obligará  a 
interrumpir  nuestra  tarea  normal.  Cuando 
hayamos  acabado  con  nuestra  conversa- 
ción volveremos  a nuestra  tarea  normal. 
Este  es  el  concepto  de  interrupción. 

Las  causas  que  pueden  provocar  una 
interrupción  son  las  siguientes: 

— Cuando  el  valor  del  ráster  sea  igual 
al  valor  almacenado  en  el  registro  de  rás- 
ter (Registro  18). 

— Cuando  se  produce  una  colisión 
entre  un  Sprite  y datos  en  la  pantalla 
(solamente,  con  la  primera  colisión  se 
activa  la  interrupción.  Hasta  que  no  se 
desactive  el  correspondiente  bit  de  habi- 
litación, no  atenderá  a más  requerimien- 
tos de  interrupción  de  esta  fuente). 

— Cuando  se  produce  una  colisión 
entre  Sprites  (sólo  la  primera  colisión). 

— Cuando  se  detecta  un  flanco  nega- 
tivo en  la  entrada  de  lápiz  óptico  (una  vez 
por  cuadro). 

Una  vez  vistas  las  posibles  fuentes  de 
interrupción  en  el  V1C-II  chip,  hablare- 


mos ahora  a nivel  de  bit  de  este  registro: 

— Bit  7:  Este  bit  se  pone  a 1 en  cuanto 
se  detecta  una  fuente  de  interrupción 
habilitada  y activada,  provocando  la  inte- 
rrupción en  el  microprocesador. 

Bits  6-4:  Estos  bits  no  se  usan.  Nor- 
malmente están  a 1. 

— Bit  3:  Este  bit  se  pone  a uno  cuando 
detecta  un  flanco  negativo  en  la  entrada 
de  lápiz  óptico,  esté  o no  esté  seleccio- 
nada el  correspondiente  bit  de  habilita- 
ción de  interrupción  (como  hemos  dicho 
antes,  una  vez  por  cuadro). 

— Bit  2:  Este  bit  se  pone  a uno  cuando 
se  detecta  una  colisión  entre  Sprites  pero 
sólo  cuando  se  detecta  por  primera  vez. 

Bit  1:  Este  bit  se  pone  a uno  cuando  se 
detecta  una  colisión  entre  un  Spritc  y 
datos  pero  sólo  cuando  se  detecta  por 
primera  vez. 

Bit  0:  Este  bit  se  pone  a uno  cuando  el 
valor  ráster  actual  es  igual  al  valor  alma- 
cenado en  el  Registro  18  (registro  ráster). 

REGISTRO  26 
(Posición  53274  - $1)01  A) 

Este  es  el  registro  de  habilitación  de 
interrupciones.  Si  una  determinada  fuente 
de  interrupción  requiere  de  éstas  y 
ADEMAS  el  correspondiente  bit  de  este 
registro  está  habilitado  (es  decir,  está  a I) 
entonces  se  activa  el  bit  más  significativo 
del  registro  anterior  que  es  en  definitiva  el 
que  provoca  el  requerimiento  de  inte- 
rrupción al  microprocesador.  Veremos 
este  registro  a nivel  de  bit: 

Bits  7-4:  No  se  usan.  Normalmente 
están  a uno. 

Bit  3:  Este  bit  habilita  la  interrupción 
desde  el  lápiz  óptico. 

Bit  2:  Este  bit  habilita  la  interrupción 
de  colisión  entre  Sprites. 

Bit  1:  Este  bit  habilita  la  interrupción 
de  colisión  entre  Sprite  y datos  de  la 
pantalla. 

Bit  0:  Este  bit  habilita  la  interrupción 
desde  el  registro  ráster. 

REGISTRO  27 
(Posición  53275  - SD01B) 

Este  registro  le  indica  al  chip  de  vídeo 
la  prioridad  que  tienen  los  Sprites  con 


c- 


respecto  a los  datos  de  la  pantalla,  es 
decir,  si  un  determinado  Sprite  va  a pasar 
por  encima  o por  debajo  de  los  datos  en  la 
pantalla.  Cada  bit  en  este  registro  tiene 
relación  con  un  Sprite  determinado:  el  bit 
0 determinará  la  prioridad  del  Sprite  0,  el 
bit  1 determinará  la  prioridad  del  Sprite 
1,  y así  sucesivamente  (l=Sprite  encima 
datos;  0=Spritc  debajo  datos). 

REGISTRO  28 
(Posición  53276  - SD01C) 

Este  registro  es  el  que  nos  permite 
seleccionar  el  modo  de  color  para  un 
determinado  Sprite.  Hay  dos  modos  de 
color:  Modo  Color  Standard  y Modo  Mul- 
ticolor. En  el  Modo  de  Color  Standard  un 
0 en  un  bit  de  patrón  de  Sprite  permite 
que  se  vea  cualquier  información  que 
haya  detrás  (se  transparentó  la  informa- 
ción) mientras  que  un  1 en  un  bit  de 
patrón  de  Sprite  hace  que  aparezca  como 
un  color  determinado  por  el  correspon- 
diente Registro  de  Color  de  Sprite.  En  el 
Modo  Multicolor  se  selecciona  este  modo 
para  cada  Sprite  independiente  mediante 
qste  registro.  Cuando  el  bit  correspon- 
diente esté  a 1,  el  Sprite  correspondiente 
se  mostrará  en  Modo  Multicolor.  En  el 
Modo  Multicolor,  los  datos  del  patrón  del 
Sprite  se  interpretan  a pares  (igual  que  en 
los  otros  Modos  Multicolor  que  veremos 
más  adelante)  como  sigue: 

Par  de  Bits  Color  Mostrado 
{MI  Transparente 
01  Color  de  Sprite  0 (Registro  37) 

10  Color  de  Sprite  (Registros  30-46) 

1 1 Color  de  Sprite  I (Registro  38) 

Cada  bit  de  este  registro  está  relacio- 
nado con  un  Sprite  determinado,  es  decir, 
el  bit  0 afecta  al  Sprite  0,  el  bit  1 afecta  al 
Sprite  1,  y así  sucesivamente  (^multico- 
lor, 0=standard). 

REGISTRO  29 
(Posición  53277  - $1)01  D) 

Este  es  el  registro  de  expansión  hori- 
zontal de  Sprites.  Cada  bit  tiene  relación 
con  un  Sprite  determinado:  el  bit  0 
actuará  sobre  el  Sprite  0,  el  bit  sobre  el 
Sprite  I,  y así  sucesivamente  (^expan- 
sión, 0=normal). 

REGISTRO  30 
(Posición  53278  - $1)01  E) 

Este  es  el  registro  de  detección  de  coli- 
sión entre  Sprites.  Una  colisión  entre  dos 
Sprites  ocurre  cuando  las  partes  no  trans- 
parentes de  dos  Sprites  coinciden.  La  coin- 
cidencia de  áreas  transparentes  de  Spri- 
tes no  generan  la  colisión.  Cuando  ocurre 
una  colisión,  los  bits  correspondientes  a 
los  Sprites  en  colisión  de  este  registro  se 
pondrán  a 1.  Cuando  una  colisión  entre 
dos  o más  Sprites,  el  bit  de  colisión 
Sprite-Sprite  para  cada  Sprite  que  haya 
intervenido  en  esta  se  pondrá  a I.  Los  bits 
de  colisión  estarán  a 1 hasta  que  se  lea 
este  registro  tras  lo  cual  se  pondrán 
automáticamente  todos  los  bits  a 0.  Las 


colisiones  entre  Sprites  también  se  detec- 
tan si  ocurren  fuera  de  la  pantalla.  Como 
en  otros  registros,  cada  bit  informa  del 
estado  del  Sprite  correspondiente  (1  coli- 
sión, 0=normal). 

REGISTRO  31 
(Posición  53279  - SD01F) 

Este  es  el  registro  de  detección  de  coli- 
sión entre  Sprites  y Datos.  Este  tipo  de 
colisión  se  puede  dar  entre  Sprites  y datos 
de  la  pantalla  de  Baja  Resolución  o puntos 
de  la  pantalla  de  Alta  Resolución.  Este 
registro  tiene  un  bit  para  cada  Sprite  el 
cual  se  pone  a 1 cuando  coinciden  datos  y 
Sprites.  Como  en  el  registro  anterior,  la 
coincidencia  de  las  partes  transparentes 
de  datos  y Sprites  no  da  lugar  a una 
colisión.  Para  aplicaciones  especiales,  la 
presentación  del  par  multicolor  01  tam- 
poco causa  una  colisión.  Esta  caracterís- 
tica permite  usarlo  como  presentación  de 
fondo  de  pantalla  sin  interferir  con  las 
verdaderas  colisiones  de  Sprite.  Una  coli- 
sión Sprite-Dato  puede  ocurrir  fuera  de  la 
pantalla  en  la  dirección  horizontal  si  los 
datos  de  la  pantalla  se  han  movido  a una 
posición  fuera  de  pantalla  (con  la  caracte- 
rística de  scrolling  suave).  También  este 
registro  se  pone  a cero  inmediatamente 
después  de  efectuarse  su  lectura. 

REGISTRO  32 
(Posición  53280  - $1)020) 

Este  es  el  registro  que  contiene  la 
información  del  color  de  marco  de  la  pan- 
talla en  los  cuatro  bits  más  bajos.  Los 
cuatro  bits  más  significativos  de  este 
registro  no  se  usan  y están  normalmente  a 
1 . Los  códigos  de  color  son  los  siguientes: 


0 

Negro 

8 

Naranja 

1 

Blanco 

9 

Marrón 

2 

Rojo 

10 

Rosa 

3 

Cian 

II 

Gris  claro 

4 

Púrpura 

12 

Gris 

5 

Verde 

13 

Verde  claro 

6 

Azul 

14 

Celeste 

7 

Amarillo 

15 

Gris  oscuro 

REGISTRO  33 
(Posición  53281  - SD021) 

Este  es  el  registro  que  controla  el  color 
de  fondo  de  pantalla.  Los  cuatro  bits  más 
significativos  no  se  usan  y están  normal- 
mente a I.  Los  cuatro  bits  menos  signifi- 
cativos son  los  que  controlan  el  color  de 
fondo.  En  Modo  Carácter  Multicolor  es 
el  color  0. 

REGISTRO  34 
(Posición  53282  - SD022) 

Este  registro  controla  el  color  de  fondo 
de  pantalla  1.  Solamente  se  utiliza  en 
Modo  Multicolor. 

REGISTRO  35 
(Posición  53283  - SD023) 

Este  registro  controla  el  color  de  fondo 
de  pantalla  2.  Solamente  se  utiliza  en 
Modo  Multicolor. 


REGISTRO  36 
(Posición  53284  - SD024) 

Este  registro  controla  el  color  de  fondo 
de  pantalla  3.  Solamente  se  utiliza  en 
Modo  Multicolor. 

REGISTRO  37 
(Posición  53285  - $1)025) 

Este  registro  selecciona  el  color  de 
Sprite  Multicolor  0.  Este  color  es  común 
para  todos  los  Sprites  Multicolor.  Los 
cuatro  bits  menos  significativos  seleccio- 
nan el  color  y los  cuatro  bits  más  signifi- 
cativos no  se  usan,  estando  normalmente 
a 1. 

REGISTRO  38 
(Posición  53286  - $1)026) 

Este  registro  selecciona  el  color  de 
Sprite  Multicolor  1.  Este  color  es  común 
para  todos  los  Sprites  Multicolor.  Los 
cuatro  bits  menos  significativos  seleccio- 
nan el  color  y los  cuatro  bits  más  signifi- 
cativos no  se  usan,  estando  normalmente 
a 1. 

REGISTRO  39 
(Posición  53287  - $1)027) 

Este  es  el  registro  de  color  del  Sprite  0. 
Los  cuatro  bits  menos  significativos  con- 
• trolan  el  color  del  Sprite. 

REGISTRO  40 
(Posición  53288  - $1)028) 

Este  es  el  registro  de  color  del  Sprite  I . 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  41 
(Posición  53289  - $1)029) 

Este  es  el  registro  de  color  del  Sprite  2. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  42 
(Posición  53290  - $D02A) 

Este  es  el  registro  de  color  del  Sprite  3. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  43 
(Posición  53291  - $l)02B) 

Este  es  el  registro  de  color  del  Sprite  4. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  44 
(Posición  53292  - $I)02C) 

Este  es  el  registro  de  color  del  Sprite  5. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  45 
(Posición  53293  - $D02D) 

Este  es  el  registro  de  color  del  Sprite  6. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite. 

REGISTRO  46 
(Posición  53294  - $D02E) 

Este  es  el  registro  de  color  del  Sprite  7. 
Los  cuatro  bits  menos  significativos  con- 
trolan el  color  del  Sprite.  ■ 
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Rincón  del  700 

SOFTWARE  PARA  EL  700  (8)  UTILITARIOS  (5) 


Por  Jordi  SASTRE 


Este  utilitario,  al  igual  que  el  ya  comen- 
tado D1SKM0N,  está  pensado  para 
sumergirse  en  las  oscuras  entrañas  del 
disco,  donde  se  hallan  los  datos  no  acce- 
didos normalmente  por  el  Basic.  En  este 
caso  se  trata  de  visualizar  toda  la  infor- 
mación que  el  ordenador  guarda  por  cada 
entrada  de  directorio,  algo  más  que  el 
nombre  y el  tipo  de  cada  fichero  propor- 
cionados por  los  comandos  CATALOG  o 
DIRECTORY. 

La  información  que  facilita  permite 
conocer  la  ubicación  física  de  los  ficheros 
en  el  disco,  dónde  están  los  “side  sector" 
de  los  ficheros  relativos,  el  anterior 
emplazamiento  de  los  ficheros  recién 
borrados,  su  posible  recuperación,  etc. 

El  uso  de  LOOR  DI  R va  muy  unido  al 
de  DISRMON.  En  realidad,  la  informa- 
ción que  proporciona  LOOR  DI  R tam- 
bién la  puede  ofrecer  el  DISRMON,  sólo 
que  LOORDIR  la  visualiza  bajo  un 
correcto  formato  puesto  que  conoce  exac- 
tamente el  significado  de  cada  uno  de  los 
bytes  que  lee. 

Su  utilidad  es  esporádica,  porque  este 
tipo  de  acceso  al  directorio  de  un  disco  no 
es  muy  frecuente,  pero  vital  en  los  casos 
en  que  se  necesita  conocer  alguno  de  estos 
datos. 

El  utilitario  lo  componen  tres  ficheros: 

— LOORDIR  Programa  principal. 

— LOORDIR. DR  Descriptor  de  panta- 
lla asociada. 

— LOORDIR. FP  Pantalla  asociada. 

Por  consiguiente,  si  alguien  desea 
copiar  este  utilitario  a otro  disco,  debe 
copiar  los  tres  ficheros. 

El  programa  se  pone  en  marcha  car- 
gando y ejecutando  el  programa  LOOR- 
DIR: DLOAD  “LOORDIR"  y RUN. 

Lo  primero  que  hace  es  cargar  del  disco 
la  pantalla  que  utilizará  para  mostrar  los 
directorios.  Esta  carga  la  efectúa  desde  el 
drive  0 del  periférico  8.  Si  por  cualquier 
causa,  esta  pantalla  estuviera  en  otro 


drive  u otro  periférico,  deberá  modifi- 
carse convenientemente  la  línea  80  del 
programa  LOORDIR 

En  la  parte  superior  de  la  pantalla  el 
programa  pide  el  formato  (8050,  8250, 
9060  ó 9090),  el  número  de  periférico  (de 
8 a 15)  y el  drive  (0  ó I)  del  directorio  a 
visualizar.  Si  se  introducen  datos  correc- 
tos, es  decir,  que  el  directorio  solicitado  es 
accesible,  se  empiezan  a mostrar  los 
siguientes  datos: 

—CABECERA  DISCO:  Visualiza  el 
nombre  del  disco  entre  comillas  y su  iden- 
tificador. 

-TIPO  DE  FICHERO:  Hace  constar 
las  siglas  SEQ,  PRG,  USR  o REI.  según  el 
fichero  sea  de  tipo  Secuencial,  Programa. 
Usuario  o Relativo,  respectivamente.  Si 
en  esta  zona  aparecen  cuatro  asteriscos 
(****)  significa  que  el  fichero  está 
borrado  (se  le  efectuó  un  SCRATCH). 
Cuando  se  borra  un  fichero,  el  DOS  úni- 
camente pone  a cero  el  byte  de  tipo  de 
fichero  y libera  los  bloques  que  ocupa  el 
mismo.  Si  desea  recuperarse  este  fichero, 
basta  con  restaurar  en  este  byte  el  tipo  de 
fichero  (puede  usarse  el  utilitario  DIS- 
RMON) con  su  valor  correspondiente: 

129  = SEQ  (Fichero  Secuencial) 

130  = PRG  (Fichero  Programa) 

131  = USR  (Fichero  Usuario) 

132  = REL  (Fichero  Relativo). 

Y volver  a ocupar  (B-A)  los  bloques. 
No  hay  ninguna  garantía  de  que  estos 
bloques  no  hayan  sido  usados  por  poste- 
riores grabaciones  en  el  disco  desde  que  se 
borrara  este  fichero,  en  cuyo  caso  este 
fichero  seria  irrecuperable.  Más  adelante 
comentaré  con  mayor  amplitud  el  tema 
de  ficheros  borrados.  Si  a continuación 
del  tipo  de  fichero  aparece  un  asterisco 
(por  ejemplo,  SEQ*  o PRG*),  significa 
que  éste  no  ha  sido  cerrado  conveniente- 
mente, por  lo  que  no  es  accesible  desde 
Basic  (puede  intentarse  acceder  a él  con  el 
DISRMON). 


—DIRECCION  DE  INICIO:  Track  y 
Sector  del  primer  bloque  usado  por  el 
fichero.  A partir  de  éste,  los  demás  blo- 
ques que  componen  el  mismo  están, 
encadenados  mediante  los  bytes  0 (track) 
y 1 (sector)  de  cada  uno. 

— NOMBRE:  Nombre  del  fichero.  En 
el  disco  está  rellenado  con  CHRS  (160). 

-PRIMER  SIDE  SECTOR:  Si  es  un 
fichero  relativo,  aqui  se  hace  constar  el 
track  y el  sector  del  primero  de  los  side- 
sectors.  En  caso  contrario  los  dos  bytes 
están  a cero. 

—BYTES  POR  RECORD:  Longitud 
de  cada  record  (si  se  trata  de  un  fichero 
relativo). 

—NO  USADOS:  Los  bytes  25  a 28  de 
cada  entrada  de  directorio  no  se  usan.  De 
todas  maneras  el  utilitario  los  visualiza 
por  si  en  alguna  futura  versión  de  DOS 
llegan  a usarse. 

—DIRECCION  DE  REEMPLAZO: 
Estos  bytes  los  utiliza  interna  y momen- 
táneamente el  DOS  para  grabar  ficheros 
con  reemplazo  (@).  Sólo  aparecen  en  el 
directorio  cuando  una  grabación  de  este 
tipo  ha  sido  interrumpida. 

— BLOCRS  OCUPADOS:  Contenidos 
en  los  bytes  29  (peso  bajo)  y 30  (peso 
alto).  Indica  la  ocupación,  en  bloques  de 
disco  del  fichero. 

Durante  la  visualización,  la  tecla  C= 
(logo  Commodore)  permite  detener  momen- 
táneamente la  impresión  (se  reanuda 
pulsando  cualquier  otra  tecla).  Si  se  pulsa 
FIO  el  contenido  actual  de  la  pantalla  es 
volcado  sobre  la  impresora  (no  es  necesa- 
rio pulsar  C=  previamente).  Y la  tecla 
ESC  interrumpe  la  visualización  para 
volver  al  principio  del  programa. 

Para  finalizar  pulsar  ESC  cuando  el 
programa  pida  FORMATO. 

Puede  ser  interesante,  ya  que  lo  he 
mencionado,  comentar  un  poco  más  pro- 
fundamente cómo  se  utilizan  los  bytes  de 
"dirección  de  reemplazo"  (bytes  27  y 28). 
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Es  sabido  que  los  programas  o ficheros 
secuencias  admiten  un  tipo  de  grabación 
llamada  “de  reemplazo”.  Se  solicita 
poniendo  el  carácter  inmediata- 

mente antes  del  drive  (en  SAVE  y OPEN) 
o del  nombre  del  fichero  (en  DSAVE  y 
DOPEN).  Por  ejemplo,  DSAVE  “(©PRUE- 
BA" provoca  que  se  grabe  en  el  disco  el 
programa  PRUEBA  borrando  cualquier 
otro  programa  que  ya  existiera  con  este 
nombre. 

Esta  forma  de  grabación  puede  dar  a 
entender  que  el  sistema  operativo  borra 
primero  el  programa  del  disco  antes  de 
grabar  el  nuevo.  Pero  no  es  asi.  El  pro- 
ceso exacto  que  sigue  es  grabar  primero  el 
nuevo  programa  en  otra  zona  de  disco, 
guardando  su  dirección  de  inicio  en  los 
bytcs  27  y 28  ("dirección  de  reemplazo”). 
Una  vez  grabado  completamente,  pro- 
cede a liberar  los  bloques  que  ocupaba  el 
anterior  programa,  el  primero  de  los  cua- 
les viene  indicado  en  los  bytcs  2 y 3 
("dirección  de  inicio”).  Por  último,  toma 
los  bytes  de  la  dirección  de  reemplazo  y 
los  pone  en  la  dirección  de  inicio,  dejando 
a cero  los  primeros. 

Vemos,  pues,  que  la  dirección  de  reem- 
plazo está  siempre  a cero  excepto  cuando 
se  está  ejecutando  la  grabación  con  reem- 
plazo. El  poder  visualizarlos  tiene  su  ven- 
taja. Cuando  una  grabación  con  reem- 
plazo es  interrumpida  por  cualquier 
causa,  en  el  directorio  aparece  el  asterisco 
(*)  indicando  que  el  fichero  no  ha  sido 
cerrado  correctamente  por  lo  que  queda 
inaccesible  desde  Basic.  Pero  en  el  direc- 
torio aún  consta  la  dirección  anterior  del 
fichero  y la  nueva  dirección,  por  lo  que  es 
posible  analizar  los  bloques  del  antiguo  y 
del  nuevo  fichero  para  intentar  recuperar 


el  máximo  de  información  posible  ¿Cómo 
recuperar  un  fichero? 

Depende  del  tipo  de  fichero  de  que  se 
trate.  Los  programas  y ficheros  secuencia- 
les  son  relativamente  sencillos  de  recupe- 
rar. Los  relativos  tienen  más  dificultad  a 
causa  de  los  side-scctors. 

Para  dar  un  ejemplo,  supongamos  un 
programa,  que  por  error  hemos  borrado 
del  disco  (SCRATCH).  Si  nos  damos 
cuenta  inmediatamente,  antes  de  efectuar 
ninguna  grabación  en  el  disco,  tenemos  la 
completa  seguridad  de  recuperarlo  ínte- 
gramente. Es  muy  importante  que  no  se 
hayan  efectuado  grabaciones  después  del 
SCRATCH,  pues  podrían  ser  utilizados 
algunos  de  los  bloques  que  antes  ocupaba 
el  programa,  en  cuyo  caso  las  posibilida- 
des de  una  total  recuperación  se  ven 
seriamente  disminuidas. 

Cargamos  el  DISKMON  y visualiza- 
mos el  primer  bloque  del  directorio  (39,1 
en  8050  y 8250).  Si  nuestro  programa  no 
está  en  este  bloque  (son  ocho  ficheros  de 
directorio  por  bloque)  visualizamos  el 
siguiente,  cuyo  track  y sector  nos  indican 
los  bytcs  0 y 1 de  éste  que  tenemos  en 
pantalla.  Analizaremos  los  bloques  del 
directorio,  siguiendo  este  encadenamiento 
entre  bloques,  hasta  localizar  en  alguno 
de  ellos  nuestro  programa. 

Una  vez  lo  tenemos,  modificamos  el 
byte  de  tipo  de  fichero,  que  es  el  primero 
de  la  entrada,  tres  más  a la  izquierda  del 
inicio  el  nombre.  Lo  identificamos  por- 
que actualmente  tiene  el  valor  128 
(fichero  borrado).  Lo  modificamos  y le 
ponemos  130  (fichero  programa:  PRO). 
Pulsamos  ESC,  grabamos  el  bloque,  etc.  y 
salimos  del  programa. 


Ahora  el  comando  CATALOG  o 
DIRECTORY  ya  visualiza  nuestro  pro- 
grama, y por  tanto  es  accesible  desde 
Basic.  Lo  que  hacemos  es  leerlo  (DLOAD) 
y grabarlo  en  otro  disco,  pues  este  lo 
tenemos  medio  alterado  y es  conveniente 
utilizarlo  sólo  para  lecturas  (no  grabar 
nada  en  él)  hasta  que  estemos  seguros  de 
haber  recuperado  toda  la  información 
que  precisamos.  Cuando  hemos  acabado 
el  traspaso  del  programa  (o  programas)  al 
otro  disco,  hemos  de  utilizar  de  nuevo  el 
DISKMON  para  volver  a poner  el  byte  de 
tipo  de  fichero  a 128  y así  no  tener  enga- 
ñado por  más  tiempo  al  ordenador,  y 
poder  seguir  utilizando  este  disco  nor- 
malmente. 

Hay  otra  manera  de  recuperar  el  pro- 
grama, algo  más  complicada  pero  más 
"correcta":  volviendo  a ocupar  en  el 
BAM  los  bloques  que  ocupaba  el  pro- 
grama. 

Se  procede  de  la  misma  manera  ya 
explicada,  pero  en  lugar  de  traspasar  la 
información  a otro  disco,  hemos  de  escri- 
bir un  programa  para  volver  a reservar  en 
el  BAM  los  bloques  que  ocupa  el  fichero. 

Antes  hemos  de  averiguar  cuáles  eran 
los  bloques  que  ocupaba  el  programa. 
Ponemos  en  marcha  el  LOOKD1R  y soli- 
citamos el  directorio  del  disco.  Localiza- 
mos nuestro  programa  y anotamos  la 
dirección  de  inicio  (bytes  2 y 3,  track  y 
sector  respectivamente). 

El  programa  ha  de  hacer  lo  siguiente.  A 
partir  de  la  dirección  de  inicio  localizada 
con  el  LOOKDIR,  ha  de  ocupar  cada 
bloque,  sabiendo  que  los  bytes  0 y I 
(track  y sector  respectivamente)  apuntan 
al  siguiente  bloque.  Es  decir: 

10  OPEN  15,8,15:  OPEN  2,8,2  “fl": 

REM  ABRE  FICHEROS. 

20  INPUI  "TRACK  Y SECTOR  DE 
INICIO";  T,  S. 

30  PR1NT815,  "Ul";  2;  0;  T;  S:  REM 
CARGA  BLOQUE. 

40  PRINT  # 15,  "B-P";  2;  0:  REM  LEE 
TRACK  Y SECTOR  DEL 
50  GET82,  T$,  S$:  REM  SIGUIENTE 
BLOQUE. 

60  PRINT8I5,  “B-A";  0;T;S:  REM 
OCUPA  BLOQUE. 

70  I=ASC  (TS-rCHRS(O)):  S-ASQSS 
-t-CHRS(O)) 

80  IF  T-=>0  THEN  30:  REM 
VUELVE  AL  BUCLE. 

90  DC'LOSE:  REM  FIN  DI  FICHERO. 
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Galería  de  Soft 

Continuación  del  listado  de  programas  de  Microelectrónica  y Control 


Programas  Commodore  64 

SISTEMAS  OPERATIVOS 

F1LE/BOSS  10.000 

Cartucho  de  ampliación  del  Sistema  Operativo  de  la  CPU  con  nuevos 
comandos  para  gestión  de  ficheros  relativos,  ficheros  tablas,  empaquetado  v 
desempaquetado  de  campos,  suma  y resta  en  múltiple  precisión  (22  dígitos)  y 
comandos  auxiliares  de  programación.  Desarrollado  en  el  departamento  de 
Software  de  M.E.C. 

CP/M  20.000 

Sistema  operativo  basado  en  el  microprocesador  Z-80.  Permite  que  un  pro- 
grama escrito  bajo  este  standard  funcione  en  un  Commodore  64.  Presentado 
en  cartucho  y en  disco. 

PROGRAMAS  DE  APLICACIONES 

EASY  SCRIPT  20.000 

Proceso  de  texto  de  gran  potencia  y versatilidad.  Versión  en  disco.  Manual  en 
castellano. 

EASY  CALC  RESULT  20.000 

Versión  simplificada  del  CALC  RESUI.T.  Presentado  en  cartucho  y uso  de 
disco  o cinta.  Manual  en  castellano. 

MAGIC  DESK  (Escribe  y Archiva)  16.000 

Cartucho  que  en  si  reúne  las  opciones  proceso  de  texto  y gestión  de  ficheros 
de  forma  simple  y eficaz.  Tiene  abundantes  ntenús  de  ayuda  y se  maneja  con 
joystick.  Presentado  en  cartucho  y uso  de  disco.  Manual  en  castellano. 

PROGRAMAS  EDUCATIVOS 

MATEMATICAS  I 3.500 

En  este  disco  están  grabados  programas  para  ayudar  al  estudio  de  algunos 
temas  de  Matemáticas.  En  su  contenido  se  incluyen  aspectos  de: 

— Cambio  de  bases  de  numeración. 

— Teoría  de  limites. 

—Prácticas  de  división. 

—Prácticas  de  aritmética. 

Presentando  en  disco.  Programas  en  castellano. 

HISTORIA  I 3.500 

Este  disco  contiene  varios  programas  para  facilitar  el  estudio  de  diferentes 
lemas  de  I US  LORIA.  En  los  diferentes  programas  que  contiene  se  analizan 
acontecimientos  sobre: 

—Historia  Medieval. 

—Historia  Antigua. 

Presentado  en  disco.  Programas  en  castellano. 

GEOGRAFIA  I 3.500 

Con  los  programas  contenidos  en  este  disco  se  pueden  estudiar  mediante  el 
uso  de  preguntas  y respuestas  las  capitales  de  los  países  de  Asia  y Africa, 
pudiéndose  modificar  por  el  propio  educador  para  adaptarse  a otros  conti- 
nentes. Presentado  en  disco.  Programas  en  castellano 

GEOGRAFIA  II  3.500 

Este  programa  permite  cargar  mapas  de  diferentes  zonas  del  Mundo,  pregun- 
tando por  la  localización  de  diferentes  ciudades.  Presentado  en  disco.  Pro- 
gramas en  castellano. 

JUEGOS  EDUCATIVOS  3.500 

En  este  disco  están  reunidos  diversos  programas  que.  en  forma  de  juego, 
representan  una  gran  ayuda  en  Educación,  desde  divertidos  juegos  para 
aprender  a sumar  y a restar,  simulaciones  de  administración  económica, 
prácticas  de  tiro  (aplicación  de  la  ecuación  de  la  parábola)  y gestión  de  un 
pequeño  negocio,  permitiendo  el  uso  del  ordenador  para  esclarecer  conceptos 
de  difícil  comprensión.  Presentado  en  disco.  Programas  en  castellano. 
TEMAS  MONOGRAFICOS  3.500 

En  este  disco  se  incluyen  programas  que  explican  de  forma  sencilla  el  funcio- 
namiento de  algunas  aplicaciones  científicas  que  utilizamos  a diario. 

Se  incluyen  explicaciones  sobre: 

— El  motor  de  explosión  (cuatro  tiempos). 

— El  motor  de  dos  tiempos. 

—El  motor  Diesel. 

Presentado  en  disco.  Programas  en  castellano. 

CONOCIMIENTOS  GENERALES  3.500 

Disco  educativo  en  el  que  se  ponen  a prueba  los  conocimientos  del  estu- 
diante en  campos  como  Física.  Química,  Matemáticas,  Geografía.  Historia. 
Programas  en  castellano. 

QUIMICA  I 3.500 

Este  disco  contiene  varios  programas  para  facilitar  el  estudio  de  algunos 
temas  de  Química.  Se  incluyen  programas  sobre: 

— Igualación  de  ecuaciones. 

— Formulación  de  compuestos. 

— Problemas  de  Química. 

Programas  en  castellano. 


Programas  VIC-20 

PROGRAMAS  EN  CINTA 
PROGRAMAS  TECNICOS 

PROGRAMACION  LINEAL  1.000 

Método  simplcx.  Cálculo  del  valor  de  las  variables  que  satisfaciendo  las 
restricciones  hacen  máxima  o mínima  una  función.  En  castellano.  Presentado 
en  caja. 

MATRICES  1.000 

Suma,  resta,  multiplicación,  multiplicación  por  un  escalar  c inversión  de 
matrices.  En  castellano.  Presentación  en  caja. 

REGRESIONES  I 1.000 

Contenido:  Regresión  lineal:  Cálculo  por  mínimos  cuadrados  de  la  recta  que 
se  ajusta  mejor  a una  nube  de  puntos. 

Regresión  múltiple:  Variable  dependiente  en  función  de  N variables  indepen- 
dientes de  grado  I.  En  castellano.  Presentado  en  caja. 

REGRESIONES  II  1.000 

Contenido:  Regresión  de  orden  N:  Variable  dependiente  en  función  de  varia- 
ble independiente  de  grado  N. 

Regresión  exponencial:  Ajuste  nube  de  puntos  a una  curva  exponencial. 
Regresión  geométrica:  Ajuste  de  una  nube  de  puntos  a una  curva  geométrica. 
En  castellano.  Presentado  en  caja. 

ESTADISTICA  I 1,000 

Distribución  normal.  Poisson,  binomial,  chi-cuadrado,  Sttident.  F de  Snedc- 
cor.  En  castellano.  Presentado  en  caja. 

ESTADISTICA  II  1,000 

Contenido:  Cálculo  de  la  media,  varianza  y desviación  tipo,  tanto  de  la 
muestra  como  de  la  población,  estando  los  datos  agrupados  o no.  Test  de 
chi-cuadrado  y test  de  Student.  En  castellano.  Presentado  en  caja. 

SISTEMAS  1.000 

Contenido:  Resolución  de  sistemas  de  N ecuaciones  con  N incógnitas. 
Resolución  de  ecuaciones  de  grado  2 dando  las  soluciones  tanto  reales  como 
complejas. 

Cálculo  de  permutaciones  y de  combinaciones.  En  castellano.  Presentado  en 
caja. 

INTEGRACION  i. 000 

Cálculo  de  integrales  por  el  método  de  Gauss. 

Cálculo  de  derivadas  de  una  función  en  un  punto.  Interpolaciones  tanto 
lineales  como  curvilíneas.  En  castellano.  Presentado  en  caja. 

PROGRAMAS  APLICACIONES 

DIETA  2.000 

En  función  de  la  edad.  sexo,  altura,  configuración  y actividad  desempeñada 
por  la  persona,  da  el  peso  ideal  Pregunta  si  se  desea  seguir  un  régimen,  y en 
función  de  la  actividad  física  desarrollada  da  el  peso  que  se  debe  tener  y la 
pérdida  diaria  que  se  debe  alcanzar  hasta  llegar  a dicho  peso  óptimo.  Está  en 
castellano  y necesita  ampliación  de  8K.  Presentado  en  caja. 

VICALC  1.500 

El  VIC-20  se  compona  como  una  calculadora  y utiliza  la  notación  polaca 
inversa.  Manual  de  instrucciones  en  castellano.  Presentado  en  caja. 

QU1Z  MASTER 2.000 

Programa  para  preparación  de  cuestionarios.  Especialmente  adecuado  para 
escuelas.  En  castellano.  Necesita  ampliación  de  8 K.  Presentado  en  caja. 

MANTENIMIENTO  DE  FICHEROS 3.000 

Programa  para  la  creación  y actualización  de  ficheros  en  cinta.  Es  configura- 
ble  por  el  usuario.  Se  complementa  con  el  C-221  Listado  de  Ficheros.  En 
castellano  Necesita  ampliación  de  3K.  Presentado  en  caja 

LISTADO  DE  FICHEROS  3.000 

Este  programa  permite  listar  por  impresora  los  ficheros  generados  con  el 
programa  Mantenimiento  de  Ficheros.  C-22U.  Es  reconfigurable  por  el  usua- 
rio. En  castellano.  No  necesita  ampliación.  Presentado  en  caja. 

ORDENAMIENTO  DE  FICHEROS  3.000 

Programa  para  el  ordcnaamicnto  de  ficheros  en  cinta.  Es  reconfigurable  por 
el  usuario.  Se  complementa  con  el  C-220  Mantenimiento  de  ficheros  y con  el 
C-221  Listado  de  ficheros.  Necesita  ampliación  de  3K.  Presentado  en  caja. 

PROGRAMAS  DE  JUEGOS 

CODEMAKER 1.500 

El  VIC-20  inventa  un  código  secreto,  teniendo  que  descubrirlo.  Instrucciones 
en  castellano  y el  programa  en  inglés.  No  necesita  ampliación. 
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en  pantalla,  cómo  utilizar  las  teclas  de 
función,  cómo  utilizar  de  modo  efec- 
tivo, periféricos  como  el  datassette 
para  almacenamiento  de  datos  y pro- 
gramas, etc.  Podemos  encontrar,  en 
esta  parte,  infinidad  de  detalles  curio- 
sos de  las  distintas  posibilidades  del 
VIC,  tal  como  cncolumnado  de  núme- 
ros, partes  decimales,  redondeo  de 
cifras,  manejo  de  cadenas  (slrings), 
ordenación,  utilización  del  reloj  interno 
como  reloj  de  tiempo  real  o como  cro- 
nómetro en  juegos,  números  aleato- 
rios, música,  pantallas,  etc.  lin  la 
segunda  parte  encontramos  diez  pro- 
gramas de  distintos  tipos,  cálculo  de 
amortización,  tipo  de  registro  de  che- 
ques, entrenador  lógico,  conversión 
decimal/hexadecimal.  entrenador  mate- 
mático, etc.  Al  final  aparece  un  con- 
junto de  tablas  de  utilidad 


Cada  juego  viene  acompañado  de 
una  descripción  y explicaciones  sobre 
las  modificaciones  que  puedes  realizar 
(si  deseas  cambiar  la  puntuación,  etc.). 


ENTARIOS 
ODORE  WORLD 


CO  MM 


Getting  the  Most 
From  Your 
Vic-20 


Commodore  64 
Fun  and  Games 


Nos  parece  útil,  que  para  facilitar  la 
edición  de  los  programas,  utilizan  un 
conjunto  de  rutinas  estándar  para 
todos  ellos  (standard  framework)  con 
lo  que  se  gana  bastante  tiempo  una  vez 
tecleado  el  primer  programa. 

También  vienen  las  señas  donde  se 
pueden  pedir  los  juegos  en  un  disco 
para  ahorrar  trabajo. 

No  podemos  decir  que  los  juegos 
sean  una  maravilla,  rápidos  y todo 
eso,  ya  que  están  escritos  en  Basic  y no 
en  código  máquina,  pero  hay  que  decir 
que  son  entretenidos,  funcionan  y 
sobre  todo  son  muy  didácticos. 


Autores:  Jeffries,  Fisher,  Sawver. 
Precio:  2.390  ptas. 


Precio  2.590  ptas. 

Hank  I.ibrach 

Micro  texl  publications,  Inc. 

Distribuido  por:  RA-.V1A  Libros 
Chiquinquira.  28  (entr.  Cocuy) 

Tel.  764  50  95 
28033  - Madrid 


editorial:  Osborne/Mc.  Graw-Hill 
Sta.  Beatriz,  4 
28038  Madrid 
Teléf.:  433  87  77 


Son  35  programas  escritos  para  el 
Commodore  64,  los  programas  no  sir- 
ven para  el  VIC-20  ni  para  los  PET 
CUM,  ya  que  utilizan  características 
especiales  del  C-64  (color,  sonido,  spri- 
les,  ele.),  lodos  los  programas  están 
escritos  en  BASIC,  y no  hay  que  ser  un 
programador  profesional  para  hacer 
funcionar  los  juegos  que  aparecen, 
sólo  hay  que  teclearlos,  ya  que  son 
programas  que  han  sido  comprobados 
por  varias  personas  antes  de  entregar- 
los en  la  editorial,  y posteriormente  el 
editor  los  comprobó  personalmente. 

Nosotros  hemos  probado  un  par  de 
juegos  y funcionaron  bien,  el  único 
problema  es  que  vienen  en  Inglés,  y si 
queréis  podéis  cambiar  los  rótulos  de 
los  mensajes  que  aparecen  en  la  panta- 
lla por  sus  equivalentes  en  español. 


Este  libro  está  dividido  en  dos  par- 
tes, la  primera  de  ellas  es  una  exposi- 
ción de  los  comandos  Basic  más 
importantes  y como  se  puede  aprove- 
char toda  su  potencia,  la  segunda 
parte  está  dedicada  a programas  de 
aplicación  específicos. 

Pese  a que  el  libro  está  en  Inglés,  se 
puede  entender  fácilmente  sin  tener 
mucha  idea  de  este  idioma,  ya  que  vie- 
nen muchos  ejemplos  y listados. 

La  primera  parte  trata  detenida- 
mente los  puntos  que  el  manual  no 
explica,  por  ejemplo  cómo  realizar 
programas  que  utilizan  el  Joystick, 
cómo  crear  caracteres  programabas 


COMMODORE  (SAKATI,  S.A.) 

NOTICIAS  DE  SOFT 

LISTA  DE  PROGRAMAS  PARA  SU  COMMODORE  64 
MANUALES  EN  CASTELLANO 

Programas  de  aplicación  Programas  de  utilidades 

Superbase  64  disco  22.500  Pts.  Extensión  de  basic  cartucho  25  000  Pts 

Base  de  datos  II  disco  5.000  Pts.  Música  64  disco  5 000  Pts 

cinta  4 OOO  Pts  cinta  4.000  Pts. 

Busicalc  disco  8.500  Pts.  Gráficos  64  disco  8 000  Pts. 

cinta  8 000  Pts.  cinta  7 500  Pts. 

Control  de  almacén  disco  35.000  Pts  Velosak  cinta  2 000  Pts 

Mailing  disco  8 000  Pts.  Tagsort  cinta  2 000  Pts. 

Lápiz  óptico  disco  14  000  Pts  Arrow  cartucho  12.000  Pts 

cinta  13  500  Pts  Compactor  cinta  3.000  Pts. 

Monitor  código  máquina  disco  6 500  Pts  Superbasic  disco  7.500  Pts 

cinta  6.000  Pts  cinta  6 900  Pts 

Desensambledor  cinta  2 000  Pts 


Centro 


Programas  de  juegos 

Palillos 

Caktus 

Aterrizaje 

Cornecocos 

King  Kong 

Laberinto 

Comando  espacial 


BOLETIN  DE  PEDIDO 

A ,.e*, a.  SAKATI.  S.  A.  Ardemar.s  74  MADRID  28 


Araña  lunar 
Defensa  lunar 
El  lago  de  los 
tiburones 
El  hortelano 
La  bruja 

Guerra  de  zilones 


Batalla  espacial 
Precio  por  cinta  2.000  Pts 
Precio  en  disco  2.500  Pts 

Ajedrez  en  cinta  4 000  Pts 
en  disco  4,500  Pts 
Jarama  84 
Camellos 


Citad 


Precio 


Centro  COMMODORE 

SOFTWARE  PROFESIONAL 

Teléf.:  256  77  94, 

Ardemans,  24  Télex  42222  CICI  E 


TOTAL 


Vladrid-28 
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COMPARTIENDO  EXPERIENCIAS 
ENTRE  AMIGOS 

Esta  sección  está  dedicada  a la 
colaboración  de  todos  nues- 
tros lectores  y está  dividida 
en  dos  partes: 

1)  Programación:  Programas 
y similares. 

2)  Magia:  Trucos,  sugerencias, 
etcétera  (pág.  50). 

Habrá  premios  y alicientes  para 
todos  los  participantes  (ver  pág.  5). 

Enviarnos  vuestra  dirección  para 
que  podáis  poneros  en  contacto 
unos  con  otros.  ¡Animaros,  chicos 
(...y  chicas )! 


BINGO 


Rafael  Muño/  Alfonso 
C/Coala  Hrava,  n"  5 (I  rb.  I an  Batlle) 
V allirana  | Barcelona) 
leléf.:  660  IX  25 


Os  mando  este  programa  para  el  C-64 
que  os  permitirá  jugar  al  BINGO  con 
vuestros  amigos  y familiares  sin  necesidad 
de  estar  continuamente  dando  vueltas  al 
bombo,  y buscando  el  sitio  donde  colocar 
la  bola  que  ha  salido. 

No  se  si  ya  habréis  recibido  algún  pro- 
grama basado  en  el  conocido  juego  del 
BINGO,  ya  que  sólo  hace  dos  meses  que 
adquirí  un  C-64  y no  tengo  mucha  infor- 
mación. Por  si  no  habéis  recibido  nin- 
guno aquí  tenéis  uno. 

El  programa  se  basa  en  el  conocido 
juego  del  bingo  y os  lo  detallo  más  ade- 
lante. sin  embargo,  me  gustaría  remarcar 
que  en  el  momento  de  salir  un  valor,  la 
probabilidad  que  existe  de  que  eso  suceda 
es  l/N,  donde  N es  el  número  de  valores 
que  aún  no  han  salido.  Asi  pues,  la  pro- 
babilidad varía  desde  1/90  (al  inicio  del 
juego)  hasta  I (a  este  limite  no  se  llega  ya 
que  el  bingo  debe  ser  "cantado"  por 
alguien,  mucho  antes).  De  esta  forma,  la 
probabilidad  varía  de  la  misma  manera  a 
como  si  estuviésemos  jugando  con  un 
bombo  y bolas,  las  cuales  vamos  extra- 
yendo de  una  en  una.  Esta  variación  de  la 
probabilidad  se  consigue  efectuando  una 
trasposición  de  valores  en  el  vector  V(I) 
(que  contiene  todos  los  valores  del  bingo) 
después  de  que  un  cierto  valor  ha  sido 
“cantado",  eliminándolo  del  vector  V(l). 

La  ejecución  del  programa  se  inicia  con 
la  presentación  en  pantalla  del  titulo  del 
programa,  a continuación  se  pregunta  el 
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número  de  cartones  vendidos,  el  precio  de 
cada  cartón,  el  porcentaje  de  premio  para 
la  linea  y el  porcentaje  para  el  bingo. 
Finalizada  la  entrada  de  datos  aparecen 
en  la  pantalla  los  premios  que  correspon- 
den a la  linca  y al  bingo. 

El  programa  continúa  dibujando  un 
tablero,  donde  se  irán  colocando  los 
números  (a  medida  que  son  "cantados") 
en  su  lugar  correspondiente.  También  se 
dibuja  una  urna,  donde  una  serie  de  bolas 
están  animadas  de  movimiento  de  ascenso 
y descenso  en  el  interior  de  la  urna.  Ln  un 
momento  determinado,  una  bola  des- 
ciende por  un  canal  que  comunica  la  urna 
con  la  bandeja,  apareciendo  el  número 
correspondiente  a la  jugada  en  cuestión 
para  ser  cantado  por  el  animador  del 
juego.  Si  ejecutáis  vosotros  mismos  el 
programa  comprobaréis  rápidamente  có- 
mo funciona  por  lo  que  no  continúo  con 
esta  explicación  y paso  a detallaros  un 
poco  el  programa. 

Líneas  1-10:  Cambian  el  color  de  la  pan- 
talla, se  inicializa  una  serie  de  variables  y 
se  llama  a las  subrutinas  que  presenta  el 
titulo  dd  programa  y la  entrada  de  datos  necesarios. 
Lineas  20-100:  Se  dibuja  la  urna,  el 
tablero  y las  bolas  en  la  urna.  También  se 
inicializa  el  vector  V(I). 

Línea  1 10:  Se  calcula  un  número  para  el 
bingo  a partir  del  índice  del  vector  V(I). 
Líneas  130-180:  Se  escogen  tres  bolas  de 
la  urna  para  que  se  muevan  en  el  interior 
de  ella. 

Líneas  190-200:  Se  controla  el  movi- 
miento ascendente  y descendente  de  las 
bolas. 

Líneas  217-290:  Se  presenta  en  pantalla  el 
número  que  ha  salido  en  el  bingo  y se 
envía  la  ejecución  al  cálculo  de  un  nuevo 
número  para  la  siguiente  jugada. 
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Lineas  300-380:  Corresponden  a la  subru- 
tina que  provoca  el  movimiento  de  las 
bolas  y controla  el  sonido  de  las  mismas. 
Líneas  400-430:  Esta  subrutina  calcula  la 
posición  del  número  que  ha  sido  “can- 
tado" en  el  tablero. 

Líneas  440-470:  Se  efectúa  una  trasposi- 
ción de  valores  en  el  vector  V(l)  para  que 
la  probabilidad  varíe  entre  los  límites  ya 
indicados. 

Lineas  475-620:  Controlan  la  tecla  pul- 
sada cuando  se  "canta"  linca  o bingo.  y se 
imprime  en  pantalla  un  mensaje  conse- 
cuente. 

Líneas  630-670:  Corresponden  a la  escri- 
tura de  mensajes  de  final  de  juego. 

Lincas  680-790:  Esta  subrutina  pide  los 
datos  necesarios  al  inicio  del  juego. 

Lineas  800-810:  Controlan  si  se  ha  pul- 
sado una  tecla  o no. 

Líneas  820-830:  Activan  las  notas  musi- 
cales. 

Líneas  880-1000:  Esta  subrutina  presenta 
el  título  del  programa  al  inicio  del  juego. 

Lineas  1 130-1 140:  Posicionan  el  cursor  en 
el  lugar  donde  se  imprimen  los  distintos 
mensajes. 

Lineas  1150-1160:  Borran  los  mensajes 
que  aparecen  en  la  pantalla  a lo  largo  del 
juego. 

Lineas  1170-2000:  Envían  la  ejecución  a 
las  dos  subrutinas  anteriores  (lincas 
1130-1160). 
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1:40  l.n-1  • OOSUB"-¡00 

200  1 = 1 Xl-D-40  di  i'  .1  IF¡  ídm  i .ij'r.l  IB8U0  (F 

P=1  IHENK  =2 

210  NF  ' . I F 

215  IFF-1 IHEN630 

217  F-NKEi  +4 . 33 

220  FfiR I «H+3T0 1 7883TEP40  PÜKEI+i  .5  P 

mi  ti  i2  PMKEM-4H+I  .0  pi.il.EIMD.8l 

225  POKTC+l  • 1/50  PQF  Pi  . I/200HFFD255  FI 

EXT  1 PDF  E'  M.D 

..'irt  r.iisLiRWNH  IFP*ITHFN6-¡0 

240  POK 1 F +f.  . 7 PUF  F F . F 1 + 48  PUF  EF+i  +0  • 

7 puf- EF+ 1,00+48  fi.ipt-1  riMDii  nF-:n 
*250  l 'UF  EPO+C , 1 POK E’PO . F I +4: •:  PUKEPO+  1 
+C  ■ I PuK  F PCD  l , i 0+4  V 
760  PUFEb+i  -1  PUKFO.F  1+43  POK E 0+  I +i 
i PUKF ú+t . 00+48 
270  i.O$IIR800  I FP=1'THF  Nb  4D 
280  P0KEF+C.5  POK  EF.  3.4  POKEF  *-l+'  . 5 P 
UKEF+1  . 32  POKFF+i  o ROI  tF  . 120 
K'1  Fu*  :+F  . b POK  F h+  4 . :::i 
785  l .UblJFlFlOD  I FP- 1 I FIE Nb  :¡H 
2:40  0d'3UEi44o  NOT0 100 
'<00  POK' El  +4. 17  12*0  I -d 
: ln  KOF'I  = I 105 

Vil  | F I ..-IHFNI.-Ml- 

330  1F  I.  : < THE  til  -:=4'0 
840  n=::i>40+i..+'  i-i  * 

850  POK  ED+L  • 5 K'OkF  U . F-'OF  F X2+L  . ' ■ F'O 

KEX.-V.  37  POKE  y.  ¡+i.  .5  PoF  F .8.  <7 

•1*0  '-=X7 + 1 .-'+1.  ; ; 8=x  s+ 1 3+1 

<65  NI  =50+1  +r  12*1-47  ■ POKFI  +1  .NT  PoF 

F4  .NI.  -2ÁND755 

870  P0F.FX7+C  ■ 6 P0KEM2 ■ 8 1 PÜKF.  13+'.  . r. 

P0KEX3, 81  POKEH+C+40+L • 6 POKED+40*I  . 

81  ' 


880  NEXTI  Fin  F ' *4.0  PETURN 

400  Fl-IFJK V • NU  :•  / 1 0 .•  C 0=V ' NI .1  • -F  1 * t O 

PO=U+80*F I 

41Ó  1FC.0-:  0THEHPO=PO+i- 0+3  ÜÚTO480 

420  Fd=F'd-5d 

4 80  PF I OPN 

440  I F NO* MhX T HE N4*o 

450  FUP T =NUT ÜMfiX- 1 V<T T+l > NEXTT 

460  MRX=MmX-1  r T = T T + 1 
47ó  PEI OPN 
475  OOSUHU  80 

480  I FLI  = 1 HHDSt=ML. " THENF'P  I FIT"L  1 NF H I «PCI 

VR[  ' F'f  ] i hNTHDFT  OOTO550 

490  I F fcB=  1 MNHS*=  " P - THF.NF'P INI  “B T t-JOi  1 1 SP'.  1 

VHISPI".  J|  Mtn  FIDO"  U0T055Ó 

500  1 F'if  = "L" THENLL=  1 PRINI  "LINEflLSPCl 

i FipPECTHlSP'.  1 •:  VN'>?"  F8OSUB560  00T057 

0 

5lo  IF:-.i="B"  THEMBB»!  •PPlNT‘'EIHi;.0[:-.PC] 
CoPPECTUlSpr  KS/N>'>"  008116560  001  058 
ó 

5¿-0  l'P INI -KPPoPI-.pl  I Mi  l SP»  JP'III.SHP"  P 
PlMT  TREi.  1 7 " PULSE 1 6PC  ) DE  t ñPC.  I MUE VO 1 SPC.  1 
IPV  -.oN  II  I PVSUFFKSPC 101  SP'  HP'vSi. 'H  lBt  PVSOF  F I 

525  OETbí  |F'  .*=" " THEN525 
530  00S0B117D 
540  GOTO  480 
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550  PR I NTTAB  '■  I .''"i  UHTINUAMI  s"  P0RK=1 
TUjiiMM  NtXlh  HCiSURI  I ,’m  fii.iTijrr.-ai 
560  GETSí  I F'-.í = " " THEN56U 
565  I f S í " i." RNH'i$  > •* M ” THEN560 
56?  RFTUPN 

5.'m  |F'-4  THENL.i  r-:i  IV.  I 1 7*  • F'RINT"LINE 

m spr.  3 copre o th"  prini  ron*  i?>"GrtNA"6i 

"PIS"  i.iTiiSSh 

;[[■■  ,f="Ñ"  IHFMLL=H  UISUHII.-M  PRI  NI 
"l  INfc'fll  SK  UNCU  SPCJCQRRECTA"  G0TQ55M 
590  !Pc;f="M"  THENPB-H  GOSUB 1 i ?H  PRIN  I 
"BJN'jiJi‘;pr  iNuiSPi  icorpE'.  fri"  (.miwíi 
6M0  IFf.**"S  ' 1 HFN608UF:  I 1 7h  P«1H'T  “B1NG 
MI  • •PC  ICORRgí  Tn"  FRINTTRBJ  I ? *“GRNft"GB 
"PTV  P=1 

6'i8  PP1NI  THR'.  I ? ' "I  H l'.l  llfíI'E'  •"  RES!  OR 
E 6OSUB820  FORT®  1 T 04**'  NEX'T'1 

620  RETIJRN 

630  PR I NT " [ CLR  3 [ CRSRD  3 ÑU I ERES C SPC 1 JU 
OAR [ SPC 3 OTRA [ SPC I VEZ  t SPC 3 ' S/N > 7 " 

640  GETSÍ  IFS*=" "THEN64M 
650  I FSÍ="S" THE  NPR I NT " [ CRSRD 3 ES t SPC J 
LO [ SPC 3 MEJOR [ SPC ] QUE  t SPC  3 PUEDES [ SPC ] 
HRCER " : FORT - 1 TÜ3000  NEXTT  OOTO 10 
660  I FSíO  " N " THEN630 
670  PR I NT " [ CRSRD 3 TU  í SPC  3 TE  C SPC  3 LO  C SPC 1 
PIERDES, I SPC 3 ADIOS"  END 
680  PR I NT " [ CLP  3 " TflB < 1 8 ) " C BLK 3 1 PVSON  3 
BIN00CRVS0FF3"  PRI NT " [¿CRSRD]"  INPUT 
"CARTONES [SPC 3 VENDI DOS" , HA  PRI NT 
690  I NPUT" PREC I OC SPC 3 DE C SPC  3 c ADA [ SPC 3 
CARTON" ; PP : PRI NT 

700  I NPUT  " Y.  [ SPC  3 PAR  A [ SPC  3 L I NEA  “ - SS  P 
RINT 

710  I NPUT " Y. [ SPC 3 PARA CSPC3BI NGO " . CC  • P 

RINT 

720  I FSS+CO 1 00THEN70M 
730  I F8S+CCC 1 00THENGL* I NT ( AA*PP*SS/ 1 
00  > : GB= I NT  < AA*PP*CC/ 100): GOTO750 
740  OL=INT<Afi*PP*SS/100)  CiB=AA*PP-OL 

750  PRI NT" [ 2CRSRD 3 PREM I O [ SPC 3ACSPC3L 
A [ SPC  3 L I NE A " GL " PTS " 

760  PR I NT " [ 2CRSRD 3 PREM I O [ 2SPC I AL 1 2SPC 3 
BINGO"GB"PTS" 

770  PR I NT " [ 2CRSR D 3 PULSE [ SPC 3 UNA [ SPC 3 
TECLA [ SPC  3 PARA l SPC 3 EMPEZAR " 

780  GETS*  IFS*=" "THEN780 
790  RETIJRN 

800  OETSí  : IFSÍO"  "THENG0SUB475 


810  RETIJRN 

820  POKEC+24 ,15  POKEC+6 , 0 POKEC+5 , 1 2 

8 : POKEC+3 , 99 ; Z=3000 

822  READM 1 : I FM 1 =0THENPOKEC+4 , O RETUR 

N 

824  R= I NT ( M 1 / 1 0 ) ■ Q= C M 1 - 1 0*R > #Z 
826  POKEC+ 1 , 0/256  POKEC • QAND255 
328  POKEC+4 , O ■ POKEC+4 , 65 : FOR 1 = 1 1040* 

<R+1 ) : NE/TI 
830  G0T0822 

332  DATA26 , 6 , 25 .5,2,2,2,5,6,7,26,6,2 
5.5,2,2,2,64,2,2,5,4,4.5,2,2,4,5,6,7 
834  DATA 15, 6,24.5,2,2,2,5.6,7,26, 6, 2 
5,5,2,2,2,94,0 

880  PRI NT "[CLR 3"  H=1027 : HH=142? 

890  FOR 1 =HT OHHSTEP40 • POKE I • 42 : POKE I + 

8.42  POKE I + 1 1 , 42  POKE 1+16.42  NEXT I 
900  FOR I =H+59T0HH-2 1 STEP40  POKEI , 42 
POKE 1+8,42  POKE I + 1 3 , 42 : NEXT I 

910  F0RI=H+lT0H+3: POKEI .42 : POKEI +200 

, 42 : POKE I +400 , 42  NEXT I 

920  POKEH+4 , 42 : POKEH+ 164,42: POKEH+24 

4.42  POKEHH+4,42 

930  FOR I =H+45T0H+ 1 25STEP40 : POKE 1,42: 

POKE 1+240 , 42 : NEXT I 

940  FOR I =H+94 TÜH+334STEP40  POKEI , 42 : 

NEXTI 

950  FOR I»H+20TOH+23: POKEI , 42  POKE 1+8 
, 42  POKE I +400 , 42  POKE I +408 , 42  NEXT 1 
960  POKEH+12, 42 : POKEH+53, 42 : POKEH+37 

5.42 

970  FOR I=H+302TOH+ 304  POKE 1,42  NEXTI 

980  PQKEH+64 , 42 : POKEH+344 , 42  POKEH+3 

84.42 

990  PR I NT " [ 1 6CRSRD  3 [ 6CRSRR 3 POR [ SPC 3 R 
AF  AEL [ SPC  3 MUN VOZ . . . " FOR 1 = 1 TO800M  NE 
XTI 

1000  RETIJRN 

1130  P0KE781 . 18  POKE 782, 17= POKE783.0 
SVS65520 
1140  RETIJRN 

1150  PR I NT " [ 22SPC 3" : PRINTTAB1  17)" [ 22SPC 1 

1155  PRINTTAB'.  17)"[22SPC3" 

1160  RETIJRN 
1170  GOSUB 1130 
1180  GOSUB 1150 
1190  GOSUB 1130 
2000  RETIJRN 


Alfanumérico. — Denominación  pa- 
ra datos  que  pueden  incluir  ambos 
tipos  de  caracteres  (alfabéticos  y 
numéricos).  Por  lo  general  se  usa 
para  definir  a todos  los  caracteres 
imprimibles,  incluyendo  espacios  \ 
símbolos. 

ASCII.— (American  Standard  Co- 
de  for  Information  Interchange)  Es 


el  método  más  usado  para  codificar 
caracteres  en  códigos  compuestos  en 
grupos  de  bits.  Prácticamente  todos 
los  ordenadores  personales  usan 
ASCII,  así  como  las  grandes  compu- 
tadoras (excepto  IBM  que  usa  un 
código  llamado  EBCDIC). 

El  código  ASCII  está  compuesto 
de  32  caracteres  de  control  que  no 
tienen  una  imagen  imprimible  y 96 
caracteres  imprimibles  a los  cuales 
normalmente  se  les  denomina  como 
caracteres  gráficos. 

BCD. — Una  abreviatura  para  deci- 
males en  código  binario,  un  método 


de  representar  números  decimales 
asignándoles  grupos  de  cuatro  bits 
binarios  a cada  dígito  de  los  10 
decimales. 

CRT. — ( Tubo  de  Rayos  Catódi- 
cos) Es  una  abreviatura  utilizada 
para  denominar  al  tubo  de  la  televi- 
sión usado  para  producir  imágenes  o 
caracteres. 

K. — (Kilobytc)  Una  medida  del 
tamaño  de  la  memoria.  La  mayoría 
de  los  ordenadores  utilizan  I6K 
como  mínimo  pero  por  io  general  se 
considera  que  hacen  falta  48 K para 
los  trabajos  serios. 
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HALTEROFILIA 


Salvador  Tudela  Edo. 

C/Gran  Vía,  Carlos  III  n"  130  “A" 

Barcelona-34 

Teléf.:  204  18  23 


“HALTEROFILIA”  es  un  programa 
para  el  VIC-20  sin  ampliar,  el  cual  con- 
siste en  pulsar  la  tecla  que  se  indica,  el 
mayor  número  de  veces  posible  en  un 
período  de  tiempo  delimitado  por  dos 
"pitidos”. 


En  primer  lugar  tendrás  que  levantar 
25  kilos,  que  en  el  caso  de  que  lo  consigas 
pasarás  a elegir  el  número  de  kilos  tú 
mismo  (lo  máximo  que  he  conseguido  ha 
sido  levantar  91  kilos). 

El  funcionamiento  del  programa  es 
bastante  sencillo,  únicamente  os  diré  que 
las  líneas  70  a 83,  son  las  que  generan  el 
sonido  de  los  dos  pitidos,  y cuentan  las 
pulsaciones  realizadas  al  igual  que  el 
tiempo;  mientras  que  las  líneas  3000  a 
5050  son  las  que  realizan  el  dibujo  del 
muñeco  levantando  las  pesas. 


VIC-20 

Sin  ampliación 


No  quiero  despedirme  sin  felicitaros 
por  la  revista,  la  cual  considero  que  nos  es 
de  una  gran  ayuda  para  poder  compren- 
der mejor  el  funcionamiento  de  "nuestro 
VIC”.  ■ 


10  P0KE52  , 24  PO KE56 . 24  CLR 
20  P0KE36369 . 254 

22  FGR I *6 1 44T0666A  POKEI.PEFK-  '6, ,24+ 

I > : NEXT I 

23  PR I NT  " [ CL  P 1 f 4l  RSP D 1 1 1 AC  P'  vpP ) í RVS!  i!  I ] 
@A" 

25  PR I H T M [ 1 0CRSRR  3 [ PV-.i  iN  3 VW “ 

26  G0KIJB3000 

40  PRINT" [3CRSRD3 [3CR8RR  J**HAI  nrpoF  i 
L IR*#" 

4 1 PR I NT " [ 4CRSRD 1 C 6CRSPR  ] • Í9-  VXS4  > " 

42  FORT = 1 TO4000 • NEXT T POKE 36879 • 1 I 

43  PR  1 NT " t CI..P  3 " • PGKE  < . 240 

45  PR  1 NT  " CUANDO  C SPC  3 0 ) «rs  t sPi  I E L [ SPC  3 
PR  I MER  " : PR  I NT  "P 13  I DO  . pl  l|  SH  í -.Pi  I L.R  [ Spl  ? 
TECLA" 

46  PR 1 NT " [ CRSRD 1 f 3CPSPP 1 A RSP  • DE RE f H 
A)/"  PRINT  L=25 

47  PR I NT " EL [ SPf : 3 MAYOR I Spi  INI. IMFR0 1 -.Pi.  ' 
DE"  PRINT"  CCRSRD3VEÍ  ESC  SPf.  IR'  r . I FUE" 

PR I NT " [ CRSRD J HASTA [ SPC 3 QUE " 

48  PR  I NT : PR  I NT  " SUENE  [ SPC  1 F I [sPi;  L-.T-.P»  l 
PITIDO, " 

49  PR  I NT " C 2CRSRD  3 1'  :-:i  RSPP  3 1 RVSON  1 1 01 
A CSPC  3 UNA  CSPC  3 TECLA  t RVS0FF  .1 " 

50  GFTXf : IFXÍ=" "THEN50 

58  POPE  '36869  • 248  • P0KE36879 . 1 45 

59  PRTNT"CCLP3"  PRINT"  [ 3CRSRD3 1 CR--.PR 1 
INTENTA!: SPC 31  EVRNTRP"  . L PPJMI  "IC  PORP 
KILOS" 

60  PR I NT" C 7CRSRD 3 L 6f PSPR 3 ATFNC 1 OH • 1 " 

65  F0RT= 1 T 04000 • NEXTT 
67  GETS* : IFSíO" "THEH67 

76  P0KE36878 . 13- P0KE36876 , 2 1 5o PR I NT " 

C3CRSRD3  C6CRSRR3 1 1 'VA 

75  F0P T= 1 T 0500 • NEXTT • P0KE36878 • 0 

77  H= 10  TI *="000000" 

78  GF.TX$  I FX*=  " [ CPSRR  3 " THENP=P+ 1 

79  I F T I /60>HT  HEN82 

80  G0T078 

82  PR I NT " C 2CRSRD 3 C 5CRSRR 3 ! ' ALTO  " " P 
0KE36878 , 15 : P0KE36876 , 215 : P0KE36879 ■ 

28 

83- F0RT=1 TO500 : NEXTT • P0KE36378, 0 
84  IFL>PTHEN1000 


85  P0KE36878 , 1 5 • F0RL.=  1 30TO254  : P0KF  36 
876,  L 

86  F0RM* 1 TO40 • NEXTM : NEXTL : P0KE36879 . 

143 

87  PRINT" [CLR 3 " ; PRI NT " [ 8CRSRD 1 TE C SPC 3 
HA [ SPC  3 COSTADO [ SPC  3 PERO . . . " 

1 00  P0KE52 , 24 : P0KE56 , 24 : CLP  P0K E3686 
9,254 

110  FOP I =6 1 44 T 06668 ¡ POKEI, PEEKC26624 
+ I ) : NEXT I 

115  PRINT" [ CLR 3 ( 4CRSPD 3 ( 1 0CRSRR 3 1 RVSON  j 
0A" 

117  PRINT" [1 0CRSRR 3 [ RVSON 3 VW " 

120  GOSU65080 

140  PR I NT " [ 3CRSPD 3 1 CRSRP 3 ' ! L0CSPC3C0 
NSEGUISTE ! !" 

1 49  FORO® 1 TO4800 = NEXTG  P0KE36869 , 240 
: P0KE36879, 63 

1 58  PR I NT " [ CLR 3 " PP 1 NT " [ 3CRSPD 3 Cl JANT 
OS ( SPC  3 K I LOS [ SPC 3 OU I E RES " : I NP1  IT " ! CRSRD I 
AHORA" : L 

1 52  PGKE36879 , 57  G0T058 

1000  PRINT" [CLR 3 " PRINT" [3CRSRD 1 f 4CRSRR 3 

LO [ SPC 3 S I ENTO • [ SPC ] SOLO " 

1010  PRI NT "[CRSRD 3 TEÑI AS CSPC 3 FUERZA! SPi  ] 
PARA" : PRINT "[CRSRD 3 LEVANTAR" ; P PRINT 
"KILOS" 

1030  INPUT "OTRO [SPC  1 JIJEGCKS/N  > " ; Ví 
1 040  I FV  f = " S " THEN00T042 
1050  STOP 

3000  FOP I -7 1 68T07 1 83  PEADX : POKE 1 . X : N 
EXT  I 

3030  FOR I =7344T07359  - REAI'X  ■ POKE  I , X N 

EXTI 

3060  RETIJRN 

5000  FOP 1=7168107180 : PEADX  P01 E 1 . X : H 
EXTI 

5ñ 1 0 DATA48 . 5 1 , 63 .59,57,  1. 5 ,15. 7 
5020  DATA  1 2 , 204  . ; '52 . 220 , 1 56 . 240  . . '40 . 

224 

5030  FOR I =7344107359 : PEADX • POKE [ . X • H 
EXTI 

504©  DATR7 .7,7, 7,3,3. 7 

5050  DATA224 , 224 , 224 , 224 . 1 92 . 1 92 , 1 92 

, 224 

5060  RETURN 
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Cuando  se  tiene  64  K de  memoria, 
una  magnífica  resolución,  16  colores, 
efectos  tridimensionales  con  sprites, 
un  sonido  equivalente  al  de  un 
sintetizador,  un  teclado  profesional 
con  62  caracteres  gráficos,  toda  una 
amplia  gama  de  periféricos,  la  más 
completa  gama  de  programas 
educativos,  profesionales  y de  video- 


juegos...; en  resumen,  cuando  se  es 
un  ordenador  personal  como  no  existe 
ningún  otro  en  el  mercado  y el  más 
vendido  mundialmente,  es  muy  difícil 
decir  sin  orgullo  que  eres  un 
Commodore-64. 

Claro  que  más  difícil  todavía  es  decir 
sin  orgullo  que  tienes  un  Commodore-64. 
¿Por  qué  no  lo  comprueba? 


COMMODORE  64 

LE  DA  ACCESO  A MUCHOS 

ACCESORIOS 


Unidad  simple  de  disco  (Monofloppy)  170  K. 
Cassette. 


COMMODORE  64 
LE  MUESTRA  PARTE  DE 
SUS  PROGRAMAS 


Plotter  e impresora,  4 colores, 

14  c.p.s. 

Impresora  matricial,  tractor, 

30  c.p.s. 

Interface  RS232. 

Joy  Stick. 

Paddle. 

Cursos  de  Introduc- 
ción al  BASIC. 


Utilitarios  y lenguajes 


MONITOR  LENGUAJE 
MAQUINA. 

FORTH. 

LOGO. 

PILOT. 


MACRO  ASSEMBLER. 

PROGRAMMER'S 

UTILITIES. 

TURTLE  GRAPHICS  II 
MASTER. 


CALC  RESULT. 

Hoja  electrónica  de  cálculo. 

EASY  CALC  RESULT. 

Versión  simplificada  del  CALC  RESULT. 

MAGIC  DESK. 

Proceso  de  texto  y gestión  de  ficheros. 
AGENDA  TELEFONICA. 


Programas  educativos 


MUSIC  MACHINE. 
MUSIC  COMPOSER. 
VISIBLE  SOLAR 
SYSTEM. 

SPEED/BINGO  MATH. 
FISICA  I. 
MATEMATICAS  I . 
HISTORIA  I. 

Juegos 

JUPITER  LANDER. 
KICKMAN. 

SEAWOLF. 

RADAR  RAT  RACE. 
TOOTH  INVADERS. 
LAZARIAN. 

OMEGA  RACE. 

LE  MANS. 

PINBALL 

SPECTACULAR. 

AVENGER. 

SUPERMASH. 

...  y seguimos  ¡ 


GEOGRAFIA  I. 
GEOGRAFIA  II. 
JUEGOS  EDUCATIVOS. 
TEMAS 

MONOGRAFICOS. 

CONOCIMIENTOS 

GENERALES. 

QUIMICA  I. 


FROGMASTER. 

GRID  RUNNER. 
ATTACK 

OF  THE  MUTANT 
CAMELS. 

THE  PIT. 

MR.  TNT. 

6 GAME  PROGRAMS. 
BINGO. 

ROOTING  TOOTING. 

MINESSOTA  FAT’S 
POOL  CHALLENGE. 

npliando  la  lista 


El  ordenador  personal  de  la 
familia  más  potente 


Sistemas  operativos 

FILE/BOSS.  CP/M. 

Programas  de  aplicaciones 

EASY  SCRIPT. 

Proceso  de  texto  de  gran  potencia. 


commodore 

COMPUTER 

MICROELECTRONICA  Y CONTROL,  S.A. 
c/.  Taquígrafo  Serra,  7,  5.°.  Barcelona-29 
c ./  Princesa,  47,  3.°  G.  Madrid-8 


EL  PISTOLERO 


Emilio  Kocafort  Riaza 

Urb.  Torres  San  Lamberlo,  17-A 

Zaragoza 


El  programa  "El  pistolero"  es  para  2 
jugadores.  Misión:  Cargarte  al  otro  lo 
más  rápidamente  posible.  Sólo  tienes  180 
segundos.  Hay  cinco  carromatos  que 
pasan  constantemente.  También  hay  cac- 
tus. Va  para  el  primer  jugador,  con  shift  y 


commodore  y Ctrl,  y para  el  segundo  con 
las  teclas  cursor  y con  la  flecha  hacia 
arriba. 

Explicación: 

Línea  1-10  Datas 
Línea  1 1 Carga  caracteres 
Línea  13-15  Coloca  cactus  e iniciali- 
zación. 

Linea  30-38  Coloca  datos  y hace 
movimiento  de  carretas  y de  hombres. 
Línea  39-85  Comprueba  tecla  pulsada. 


VIC-20 

SIN  AMPLIACION 


1 


Línea  1 10  Control  del  tiempo. 
Línea  120  Comprueba  balas. 
Línea  130  Salto  de  continuación. 
Línea  140-157  Printa  balas. 

Línea  160-215  Subrutina  de  tiros. 
Línea  Fin  de  juego. 
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Javier  Salas  Varóla 

Me  io  sugirió  mi  hermana  Milagros 
pues  decía  que  como  este  popular  juego 

C-64 

Velázquez,  nv  1 

no  lo  teníamos  y yo  me  lancé  v aquí  está. 

Cádiz- 10 

El  programa  no  contiene  muchos 

POKES  por  le  que  es  muv  fácil  pasarlo  al 

Me  llamo  Javier  Salas  Várela  y tengo 
13  años  de  edad.  Os  mando  este  pro- 
grama, pues  yo  también  quiero  aportar  mi 
granito  de  arena  a la  revista.  Espero 
publiquéis  este  juego  "**MASTER 
M1ND**".  El  programa  esta  realizado  en 
un  C-64. 


VIC-20.  Explicación: 

El  ordenador  te  da  a elegir  si  la  combi- 
nación de  números  a adivinar  sea  de  1 a 6 
dígitos,  seguidamente  nos  pregunta  si  los 
dígitos  se  pueden  repetir,  se  esperan  unos 
segundos  y saldrá  la  primera  elección,  el 
máximo  de  intentos  es  100,  quedando  en 
el  estabilizado  hasta  que  se  acierte,  des- 


pués el  ordenador  nos  dice  los  puntos 
obtenidos  en  los  cuales  se  tiene  en  cuenta 
el  tiempo,  el  nivel,  y otros  factores,  el 
ordenador  si  haces  nuevo  récord  le  lo 
dice  y si  no,  te  ofrece  el  anterior. 

En  fin  buena  suerte  y que  sigáis  con 
esta  magnifica  revista.  ■ 


10  Pf  I I*  ♦MR  -.  I i !•  • ' 1 ' "F* 

15  1)1  !•'  0'  14  1 
ki  r i;  s 1 . |. 

;ii  "ir " r I I 
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M II IIH  I V i O I"  1” 

60  pRUU  "i  I0i  RSRp  I”  PRINt  'I  Hl  'i  .i  '•i'1  I 
l-'EHl  l,  WiOfSPC  IK'!-d  sPi'  i l,  (Sf>f  I HS.P 
III..:-', Mi  • .|m  HINHl  ••H  ' i.:i  m" 

70  Gf  r n i I'  MJ  = " ,i  )Ti  i ,'n 
m M-  MU  "H  H-'  II  RSPÜ I I " 1FI  - »•«»• 

DE I ni DuP C SPÜ  l ES'  i “-'i  t ' >E>«  |i  iMr <NUM!  • 
CSPl  luí  I ■ V-'  IH.'HP. 

'■40  I'|::-pl  f:=l1  RV-.ÍI  IRE 

100  PR  1 HT"  ( ..  i p,;  RB1  OEf '-,P'  !•  l IMH  r-  .1  •■-¡pi  l 
rEPMINiiSLGpi.  mi-'.l  HI'.I-'I  IH  ISPI  1MIIM:  mi 
•-1-6)  " 

105  I'MPIJI  ñ 

107  IR  FK1  DP  0 5 i Hf  N 

109  [!$-"  L45PC] " POR  1=1  Tu  h n r i.i$  < 

c BL..K j r spr i " nexi  por  i i ro  40-2*0  1 

$*D$+"t::.PC]"  NEXT 

'10  PR 1 NT " f 2CR'  ,F’D  1 DESEhI  -,P'  I'.'I.II  ■ ¡ ' I 
,p;  i SF-I  IF'IJE:D0H[5Pi  IRFP'ET  IRI  ' HFPMIN 
OS" 

120  INPUT"  ■:  : VHi' " JBt 
1,5  |F  B$0"S”  0WB  B$0"N"  IHfc'N  120 
| ;0  PRIMT  : PPINI  PPfNPPULSF  fSK  I'  "R| 
QUIERISPC  JTEfl  0" 

1 35  GE  T i S 1 F C$=""  GOTO  13“* 

137  [p  F¡$=  T HE H i ,i r-.l  if:  1 ruin  i¡01ii|4'i 


I.  "INTENTOS"  GOTi.Hhhmm 
GOSUB  0000 

I GET  Hí  IP  H*=" "GOTf  060 
i IF  Ht="S"  GOTO  70 
i END 

i INPUT  C$<I> 
i NEXT  I 
i RFTIIRH 

i POR E 54200,9  FuR  7=1  I"  ■'  RPRB  l 

¡ NEXT 

i F0RX=  1 T 0 1 4 RERD  D<X)  NEXI  FORT"  l 
■ por f 54275; L<  i • FOR  7=1  I"  D<2# i 
NEXT 


Tele  Sant  Just 

Mayor,  2.  Tel  (93)  371  70  43 
SAN  JUST  DESVERN  (Barcelona) 


INTERFACE  para  recibir  y transmitir 
CW  y RTTY  en  el  VIC-20  y 
COMMODORE  64 


1 33  Gii'-:l.JB2000 

140  OOSI .IB  300  PPINI  "(i  l P I"  GOSUB5000 

150  M=M+ 1 G0SUB  70H0 

160  POP  1 = 1 Ti'  0 

170  GET  f $ IP  rf=""  THE N 170 

180  IP  C$< " 1 " 0P  Cf>"9"  THEN  170 

190  12  I ' =V0L  < I f > • PP  í NTC'I " f :;,PC  I 

200  NEXT 

205  G0SUB  6000 

210  GO&IIB  -¡000  IP  N*sfl  THEN  90H 

220  PRTNTN"rT"B"H"  PRINT 

225  1F  M>8  THEN  PRINT"  I Hi'MI"  Gi  iMJBM' 

00  PRINPT  16CRSPB] " ■ 

230  GOTO  1.50 

500  PRINT "CCI  R]I2i:  R'  -RB  I [ 3CRSPR 1 1 P'F D I 
",  POR  1 = 1 TU  H PRINT  LEPT$'51P$' I 
) ) » 2 > . ¡ NEXT 

340  PPINI  PRINT  PPINT"HEi  HOfGPi; 1FNI  Pf  1 


INTERFACE  para  poder  conectar  cualquier 
cassete  a los  ordenadores 
COMMODORE  64. 


BASE  DE  DATOS  en  cassette 
ARCHIVO  DE  OSL. 


NECESITAMOS  DISTRIBUIDORES' 
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EDITOR  DE  CARACTERES 


Santiago  Casas  Duarle,  16  años 

Emperatriz  Eugenia  14,  lv 

Tcrrassa  BARCEI-ONA.  Uno.:  788  04  33 


El  programa  que  os  presento  es  lo  lla- 
mado UN  EDITOR  DE  CARACTERES, 
ya  que  hasta  el  momento  no  he  visto  nin- 
guno tan  completo  ¡¡modesto  ehü  en  la 
revista. 

El  primer  consejo  que  os  he  de  dar,  es 
que  una  vez  entrado  el  programa,  lo  gra- 
béis, pues  es  un  programa  que  se  modifica 
él  solo  al  ejecutarlo. 

Al  poner  en  marcha  el  programa,  nos 
sale  un  interrogante  en  la  esquina  supe- 
rior izquierda,  esto  significa  que  está 
esperando  que  entremos  el  carácter  que 
debe  modificar. 

Una  vez  hecho  se  formará  en  la  panta- 
lla un  cuadrilátero  de  8X8  asteriscos 
excepto  uno  que  es  el  signo  al  que 
podemos  llamar  cursor. 
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Cuando  apretamos  la  tecla  fl  y move- 
mos el  cursor  de  sitio  nos  damos  cuenta 
que  el  asterisco  ha  cambiado  de  color.  Se 
está  empezando  a crear  un  carácter.  La 
tecla  17  borra  el  punto. 

Cuando  apretamos  la  tecla  f5  nos  sale 
el  dibujo  que  estamos  formando  mucho 
más  claro.  Cuando  la  tecla  que  apretamos 
es  la  fó,  y esperamos  un  poco  (faltada!) 
sale  el  carácter  que  queremos  editar  a 
tamaño  natural.  Apretamos  una  tecla  y 


«1 


m 


mrr? 


vic-20 

SIN  AMPLIACION 


volvemos  al  estado  normal. 

Una  vez  creemos  que  el  carácter  ya  está 
bien  diseñado,  apretamos  la  tecla  f3,  lo 
cual  nos  crea  una  instrucción  DATA, 
volviendo  a preguntar  por  otro  carácter. 

Una  vez  hayamos  terminado  de  editar 
caracteres,  apretamos  la  tecla  f4  y desapa- 
recerá el  programa  del  editor  quedando 
sólo  las  instrucciones  DATA  y un 
pequeño  programa,  que  poniéndolo  delante 
de  un  programa  en  el  cual  necesitáis  los 
caracteres  creados  y escribiendo  POKE 
36869,255  los  podréis  utilizar,  y para  vol- 
ver al  modo  normal  del  VIC,  escribir 
POKE  36869,  240. 

Otra  cosa,  el  programa  está  preparado 
para  funcionar  sin  ningún  tipo  de  amplia- 
ción de  memoria.  ■ 


10  ML=  9000 
20  X= 1 V= 1 
30  DIML(8,8:',fK8> 

40  RBÍ  = " [ 8CRSRB ] " HLí="  L 8CRSRR 3 " 

59  P0KE36879 , 8 

60  PR 1 NT " t CLR 3 '' " GETHf  IFh$=-" "THEN60 

70  PR  I NT " C HOM  3 " m '■  WE=RSC  < Rí  1 I FWB=>6 
4THEHWB=WB-64 

88  FOR I = 1 T 08  PRINT"  [SPC]****-+*++" 

90  NEXTI 

1 00  PR  I NT  " [ HOM  ] M ; LEF3  $ ( RBí , V ,■ , LEF 1 $ • 
flL$,x>;  "-" 

110  GETRf  IFR$=" "THENl 10 
1 20  I Fft$="  [F73  " THENL  < X .•  V > =Ñ  : GOTO  1 40 
130  IFL.XX,  V > = 1 T HENPR I NT " C HOM  J " , LEFTf 
( RBí .■  V > ; LEFT $ < RLT  , X > i "LWHT3*CBLU J"  G 
OTO 160 

1 40  I Fftf  = " [ F 1 ] " THENL  •.  X , V > = 1 = GOTO  1 60 
1 50  PR  I NT " C HOM  ] " ; LEFT  $ ( HBÍ , V)  , LEFTT < 
FlL*,X>, 

1 60  I FRÍ = " C CRSPR ] " THENX=X+ 1 
1 70  I FR$= " C CRSRL J " THENX=X- 1 
180  IFRf=" C CRSRB ] " 1 HENV=V+ 1 
1 90  IFR$=" L CRSRU J " T HENV=V- 1 
200  I FR$= ” CF4 1 " THENGOTO720 
210  I Ffi$= " C F3  3 " THEN500 
220  1 FRT= " [ F5 3 " THENOOSUB290 
230  I Fñf = " C F6  3 " THENGOSUB370 
240  IFX>8THENX=1 
250  I FXC 1 THE.NX=8 
260  IFV>8THENV=1 
270  IFVCl THENV=8 
280  GOTO  100 
290  F0RJ=1T08 

300  FOR  1=7690+22*  I í 07697+2,:+ J 

310  H=H+1 

320  IFLíH, J > = 1 THENK= 1 60  GOTO340 
330  K=32 

340  F'OKE  I .■  K POKE I + 30 720  • 1 
350  NEXTI  H=0  NEXTJ 
36Ó  RETUPN 

370  FOR I = 1 TOS  R < I 1 =0  NEXT I 
:80  TG=1  F0R.J=1T08 
390  FOR I =8T 0 1 8TEP- 1 
400  IFLí.  I • J ) = 1 THENR < J > =R T '+TG 
410  TG=T0*2 
420  NEXTI  TG-l : NEXTJ 
430  P0KE52, 28 : P0KE56 • 28 
440  FOR I =070511 : POR  E 7 1 68+ 1 / PEE f • 3776 
8+1 > : NEXT I P0KE36869 , 255 
450  FOR I =74 1 6T07423 : GH= 1-74 1 5 POI  E I ■ 

R < OH > : NEXTI 

460  PR I NT " [ HOM 1 [ 1 4CRSRD 1 1 5l -RSRR J I WHT 3 

470  OETBÍ : IFB$=" "THEN479 

480  PR  I NT  " t HOM  .1 1 1 4CRSRD  3 [ 5CRSRP  3 [ 3SPC  3 

" : POKE 36869.'  240 

490  RETIJRN 

500  REM  CONTRU IR  DhTh 

5 1 0 FOR I = 1 TOS • fi< I > =0  NEXT I 

52@  TG=1  FORTUITOS 

530  FOR I =8T O 1 STEP- 1 

540  IFLC I > J > = 1 THENR < J > =fl < J ) +TG 

550  TG=TG*2 

560  NEXTI  T 0= 1 NEXTJ 

570  PR I NT" [ CLR 3 [ 2CR3RB 3 " ; 

580  PRINTNL;  "BRTR"  UB" , " ; 

590  FORI=1T08 
600  PRINTRCD  ; 


610  I F I Í8THENPR I NT " [ CRSRL 3 , " ; 

620  NEXTI 
630  PRINT 

640  PRINT" 10CSPC3NL=" ; NL+1 
650  PRINT" RON C BLU 3 " 

660  PRINT" C HOM 3 " ; 

670  POKE 198,3: P0KE649 , 1 0 
680  F0RI=631T0633 
690  POKE 1,13 
700  NEXTI 
710  ENB 

720  PR I NT " [ CLR 3 [ CRSRB  3 " 

730  PR I NT 1 0000 "G 1=32768  02=7168: FOR I 
=0TO51 1 " 

740  PR I NT 1 000 1 " P0KEG2+ I , PEEK < G 1 + I > " 
750  PR I NT 1 0002 " NEXT I " 

760  PR I NT 1 O003 "FOR 1=1 TO " NL-9008 " REH 
DC  FORJ=0TO7 : RERBK" 

770  PR I NT  1 0004 " P0KEG2+ < C*8 ) +J , K NEXT 
J, I : P0KE52 • 28 : P0KE56 , 28 
780  PR I NT " RUN350 " 

790  PR I NT " [ HOM 3"; = POKE 1 98 , 6 FOR I =63 1 

T0636  POKE 1,13  NEXT I : ENB 

840  PR I NT " [ HOM  3 " ; = POKE 1 98 , 9 : F 0RN=63 1 

T 0640 : POKEN, 13  NEXT  ENB 

850  N=0 

860  PR 1 NT " I CLR 3 [CRSRB 3 " : FORM- NTON+60 
STEP 1 0 PR I NTM : NEXT  PR 1 NT850 " N= " M PR I 
NT"RUN850" 

870  IFNC785THEN840 
880  PR 1 NT "CCLR3C 2CRSRB 3 " 

890  F O R N = 3 4 0 T O 8 9 OS T E F'  1 0 PR  I NTN  NEXT 
PR I NT " POKE 1 • 0 SVS 1 " : GOTO840 


KEGISTEK  LATELY 
CONTINENTAL,  S.A. 
Balmcs-247,  pral.  2o  A 
BARCELONA-6 
Teléf.  (93)  200  18  99 
Información:  Sr.  KERRER 


NUESTRA  EMPRESA 
AL  SERVICIO  DE  TODOS 


DEPARTAMENTO  COMERCIAL: 

— Microprocesadores  y ordenadores  de  gestión  (gama 
Commodore)  para  el  particular  y Empresa. 

— Programas  educativos,  de  juegos  y de  diferentes  aplica- 
ciones. (Gestión,  contabilidad). 


DEPARTAMENTO  DE  ESTUDIOS: 

— Cursos  Programación  Basic  y Cobol. 

— Cursillos  de  grabación. 

— Prácticas  con  ordenadores  y micro  en  la  propia 
Empresa. 
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62-A5 

98-101 

P Al  1IO 

Maní  isa  dd  PAC  1. 

6(» 

102 

FACSGN 

Signo  acumulador  de 
coma  flotante. 

67 

I0J 

SGNFLU 

Bandera  de  evaluación 
de  signo. 

6X 

104 

BIIS 

Bandera  de  sobrecarga 
de  PAC. 

6V 

105 

ARGEXP 

F. \ ponente  del  V A(  nu- 
mero 2. 

6A-60 

106-109 

ARGHO 

'tamisa  del  FAC  2. 

6F. 

110 

ARGSGN 

Signo  dd  FA(  2. 

61 

111 

AR1SGN 

Signo  de  operación 
entre  FAC  1 v 2. 

70 

112 

FACOY 

Sobrecarga  v redondeo 
de  FAC. 

Los  punteros  CURL1N  y OLD- 
LIN,  son  como  podéis  ver,  los  que 
contienen  el  número  de  línea  que  se 
está  ejecutando  en  ese  mismo  momen- 
to y el  de  la  última  línea  ejecutada 
respectivamente.  Pueden  ser  útiles 
para  que  interceptando  la  ejecución 
de  las  rutinas  de  interrupción  por 
medio  de  un  programita  en  código 
máquina,  podamos  visualizar  en  una 
esquina  de  la  pantalla  que  línea  se 
está  ejecutando,  o en  caso  de  error 
cuál  fue  la  línea  anterior  al  error,  etc. 

El  puntero  OLDTXT,  señala  el 


último  comando  o instrucción  BASIC 
que  se  estaba  ejecutando,  sirve  para 
poder  utilizar  el  comando  CONT  y 
continuar  la  ejecución  de  un  pro- 
grama después  de  una  parada  de  pro- 
grama (con  STOP). 

DATLIN  contiene  el  número  de  la 
línea  data  de  la  que  se  están  leyendo 
los  datos  con  READ;  se  puede  utili- 
zar para  saber  en  qué  línea  nos  hemos 
equivocado  al  copiar  un  programa, 
podéis  ver  cómo  hacerlo  en  el  pro- 
grama "teclas  de  función”  (número  3 
de  la  revista). 

DATPTR  es  el  puntero  que  señala 
la  posición  de  memoria  donde  se 
encuentra  el  dato  que  vamos  a leer 
con  una  sentencia  READ.  Podemos 
alterarlo  junto  con  el  anterior  para 
simular  una  sentencia  RESTORE 
NNNN,  ya  que  la  que  tenemos  en 
nuestros  equipos  lo  hace  al  primer 


DATA,  pero  no  podemos  hacerlo  a 
un  número  de  línea  determinado. 

1NPPTR,  es  un  puntero  que  utiliza 
la  rutina  de  entrada  de  datos  ‘INPUT, 
para  leer  los  datos  que  nosotros 
hemos  tecleado  detrás  de  la  interro- 
gación que  aparece  en  la  pantalla. 

VARNAM  es  el  nombre  de  la 
última  variable  a la  que  nos  hemos 
referido  en  el  programa  BASIC. 

VARPNT  es  el  puntero  al  dato  que 
se  está  utilizando  actualmente  en  la 
variable  BASIC. 

FORPNT  es  el  puntero  que  señala 
a la  variable  utilizada  como  índice  del 
último  lazo  FOR-NEXT  abierto. 

TEMPTR  son  un  conjunto  de  pun- 
teros utilizados  para  diversas  aplica- 
ciones por  el  intérprete  BASIC,  no 
tienen  una  aplicación  fija  en  exclu- 
siva. Podéis  ver  como  ejemplo  la 
rutina  "Move  Memory”  aparecida 
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en  la  sección  de  magia  del 
número  6 (Página  51). 


FACEXP  es  el  expo- 
nente del  acumula- 
dor de  coma  flo- 
tante número  uno. 

FACHO  es  la 
mantisa  del  mis- 
mo acumulador, 
y FACSGN  es 
su  signo. 

SGNFLG  es  un 
byte  que  sirve  para 
calcular  el  signo  de 
una  operación,  mien- 
tras que  BITS,  actúa 
como  indicador  de  sobre 
carga  de  la  operación  en  el 
acumulador,  si  los  valores 
alcanzados  se  han  salido  de  los 
límites  permitidos. 

ARGFXP  es  el  exponente  del  acu- 
mulador número  dos,  ARGHO  es  su 
mantisa  y ARGSGN  es  su  signo. 

La  función  de  ARISGN  es  la  de 
calcular  el  signo  del  resultado  de  la 
operación  entre  los  dos  acumulado- 
res, y la  de  FAC’ÜV,  comprobar  si 
hubo  sobrecarga  o redondeo  en  el 
resultado. 

Los  acumuladores  de 
coma  flotante 

Para  almacenar  en  la  memoria  los 
números  de  nuestro  sistema  de  nume- 
ración (decimal),  y poder  realizar  con 
ellos  operaciones  matemáticas,  los 
microordenadores  se  ven  obligados  a 
convertirlos  en  sus  equivalentes  bina- 
rios en  notación  de  coma  flotante. 

Hl  lugar  donde  el  ordenador  los 
maneja,  los  convierte  de  decimal  a 
binario  en  coma  flotante  y viceversa, 
y realiza  las  operaciones  aritméticas  y 
lógicas,  se  denomina  acumulador,  y 
para  diferenciarlo  del  que  utiliza  la 
CPU,  especificamos  que  es  de  coma 
fiotanle,  respondiendo  a las  siglas  de 
FAC  (Floating  Point  ACcumulator). 

En  los  acumuladores  de  coma  no- 
tante o FAC,  la  información  se 
guarda  según  el  formato  de  la  figura 


Podemos  ver  que  en  la  primera 
posición  de  memoria  aparece  el 
exponente,  este  corresponde  al  utili- 
zado en  la  notación  científica,  que  es 
en  realidad  la  utilizada  para  los  F AC. 
lambién  vemos  que  al  exponente  se 
le  suma  129  para  que  se  puedan 
almacenar  exponentes  positivos  y 
negativos. 

La  mantisa  del  número  almace- 
nado en  el  FAC  1 se  guarda  en  las 
posiciones  $62  a $65,  denominadas 
FACHO,  y su  signo  se  calcula  en  la 
siguiente  posición  (FACSGN),  pero 
se  guarda  como  el  bit  más  alto  (el  sép- 


timo) del  pri- 
mer byte.  La 


de  me- 
moria se 
compor- 


ta como 


de  signo 


cador  de  sobrecarga,  tanto  por  exceso 
como  por  defecto,  en  todos  los  cálcu- 
los que  realiza  el  intérprete  BASIC 
con  el  acumulador  número  I . El  error 
“overflow",  aparecería  si  el  número 
almacenado  en  el  FAC  fuese  mayor  o 
menor  que  las  cantidades  máxima  o 
mínima  que  puede  manejar  el  FAC. 

Las  siguientes  direcciones  de  me- 
moria, se  comportan  exactamente 
igual  que  estas  últimas  pero  para  el 
segundo  acumulador  FAC,  que  es  el 
que  se  utiliza  como  argumento 
en  la  mayoría  de  las  ope- 
raciones. ■ 


para  las  operacio 
nes  que  se  efectúen  con  el  FAC 
Finalmente  BITS,  sirve  como  indi- 


Exponente 

binario 

+129 

Mantisa  binaria  en  BCD  empaquetado 
dando  una  precisión  de  8 dígitos. 

El  primer  bit  del  primer  byte  es  el  signo 

PROGRAMADORES 

EDITORIAL  DE  SOFTWARE 
INTERESADA 
EN  PUBLICAR 
Y COMERCIALIZAR 
PROGRAMAS 
PARA  ORDENADORES 
PERSONALES 
(COMMODORE  64, 
SPECTRUM,  etc.) 


CASA  DE  SOFTWARE  S.A.  Aragón,  272,  8?  62.  Barcelona 
Teléfono:  215  69  52 
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r COMPARTIENDO  EXPERIENCIA  ENTRE  AMIGOS' 


Magia 

La  MAGIA  son  trucos,  la  MAGIA  es 
divertida. 

La  MA  GIA  es  hacer  lo  que  nadie  se  ha 
atrevido  y resulta  ser  la  fuente  más 
completa  de  información  para  la  informática 
práctica. 

La  MAGIA  es  una  sección  mensual 
llena  de  consejos,  trucos,  de  esto  y aquello 
del  mundo  del  software,  hardware  >> 
aplicaciones,  trucos  descubiertos  por  los 
demás  que  hacen  que  la  informática  sea 
más  fácil,  más  divertida  o más  animada. 

MAGIA  habla  de  ideas  sencillas,  progra- 
mas de  una  sola  línea,  subrutinas  útiles, 
hechos  de  informática  poco  conocidos  y 
otras  cosas  de  interés. 


Recuperador 

Cargando  un  programa  desde  el  cassetlc  se  puede  dar  el  caso  en  que  el 
ordenador  nos  dé  el  mensaje  de  ? LOAD  ERROR. 

Comprobamos,  sin  embargo,  que  el  listado  aparece  integro  pero  si 
hiciéramos  UUN  nos  quedaríamos  sin  el  programa. 

Si  el  error  de  carga  se  sitúa  hacia  el  final  de  la  grabación  del  programa 
es  posible  (pero  no  siempre)  recuperarlo  tecleando  la  siguiente  línea  en 

m0pOKE45°'PEEK(l74)  : POKE46  . PEEK0  75) : CLR  (RETURN) 

Es  condición  indispensable  el  no  haber  hecho  RUN  después  de  la  ope- 
ración de  carga.  , J . . 

Si  el  error  se  da  en  la  carga  de  un  fichero  de  datos,  que  puede  lormar 
parte  de  un  programa  este  método  no  es  aplicable. 

La  mejor  recomendación  es  sin  duda  el  tener  una  copia  de  seguridad  de 
cada  programa  y recurrir  a ella  en  estos  casos. 

Si  pagamos  la  carga  de  un  programa  con  la  tecla  RUN/STOP  (en  la 
segunda  mitad  de  la  grabación  del  mismo)  y después  tecleamos  la  línea 
antes  citada  podemos  comprobar  que  al  hacer  RUN  el  programa  se  eje- 
cuta correctamente.  Se  puede  dar  algún  caso  en  que  esto  no  sea  cierto  ya 
que  estamos  pasando  por  alto  la  seguridad  de  la  carga  de  programas 
desde  el  cassette.  j.  R,  /..  (Iniciales  por  expreso  deseo) 

BERGARA  (Guipúzcoa) 

Acalora  la  programación 

Tengo  un  VlC-20  y soy  suscriptor  de  vuestra  revista.  Se  nota  un  impor- 
tante avance  en  su  contenido  a medida  que  van  apareciendo  nuevos 
números.  Os  felicito  por  ello. 

En  cuanto  a la  sección  de  Magia,  también  quiero  hacer  mi  pequeña 
aportación: 

1)  Conecte  el  VIC-20  y prepare  la  siguiente  linea: 

PRINT  2+2  y pulsando  RETURN  aparece  4. 

También  preparando  la  línea:  ?2+2  y pulsando  RETURN  aparece  4 

2)  Ahora,  prepara  la  siguiente  línea:  10  PRINT  "Y"  y pulsando 
RETURN  y luego  tecleando  RUN  sele  Y.  También,  preparando  linca: 
I0?"Y”  y pulsando  RETURN  y luego  tecleando  RUN  sale  Y,  y ademas 
tecleando  LIST  sale  10  PRINT  "Y". 

Conclusión:  El  símbolo  ? equivale  al  PRINT.  Por  tanto  se  consigue  un 
ahorro  de  teclado  (4  símbolos). 

Esto  es  todo  por  ahora.  Espero  continuar  participando. 

Joan  Mons  i Bruguera.  10  años 
C/ María  Vidal.  20.  Vilassar  de  Mar.  Barcelona. 

Tabla  do  multiplicar 
Bandora  do  España 

Esta  es  la  segunda  vez  que  os  escribo,  y en  esta  ocasión  aprovecho  para 
enviaros  un  programa  de  una  sola  línea  para  la  sección  de  Magia  y con  el 
cual  se  puede  conseguir  la  tabla  de  multiplicar  del  1 al  10  de  cualquier 
número,  es  muy  sencillo,  aunque  espero  que  sea  de  vuestro  interés  para 
publicarlo. 


PREMIOS:  (VER  PAG.  4 y 5) 


También  añado  otro  programa,  éste  es  de  Feo.  Federico  1 borra  de 
Madrid  que  salió  publicado  en  la  revista  4 del  mes  de  mayo  y que  dibu- 
jaba la  bandera  española,  el  cual  tuve  que  rectificar,  pues  intente  introdu- 
cirlo en  mi  VIC-20  con  los  cambios  de  POKE  que  apuntaba  y el  color 
amarillo  no  aparecía.  Con  el  que  envío,  si  que  se  dibujó  la  bandera  con 
sus  dos  colores  —rojo  y amarillo—,  pero  para  que  estuviese  dentro  tic- 
una línea  de  programa  tuve  que  abreviar  todas  las  sentencias,  pues  de 
otra  manera  no  resultaba. 

Las  variaciones  que  efectué  fueron  las  siguientes: 

Cambié:  POKE  34304+A.7  por  38532+C.7.  para  que  apareciese  el 
color  amarillo. 

Añadi:  FORC=Oto241  para  que  el  color  amarillo  ocupara  la  iranja 
central  de  la  bandera. 

Y pasando  a otra  cosa  y si  no  es  mucho  preguntar,  quisiera  saber  la 
longitud  de  bytes  que  tienen  los  dos  programas  y cómo  se  averigua. 

lpRINT"TABLAfsPC]DE[SPC]MULTlPLICAR“:INPUTA:FORC=l 

TOIO:B=A*C:PRINTA:  "X”;C;“=";B:NEXT:GOTO  I 
Bandera  de  España: 

I PRINT'ICLR1":POKE36879,41:FORC-OTO  24LPOKE38532+C.7: 
NEXT:FORA=7812TO80  53:  POKEA,102;NEXT:FORB=lTO2199:NEXT 

Lourdes  Esteban  Diez 
C/Lope  de  Vega.  265.  Al.  I " Barcelona-IS 

Utiliza  REM 

Si  se  quiere  eliminar  una  línea,  o parte  de  ella,  de  un  programa  para  ver 
su  efecto  sobre  el  mismo,  pero  luego  se  quiere  recuperar  sin  escribirla  de 
nuevo,  se  escribe  un  REM  delante  de  la  porción  de  línea,  o línea  que 
queremos  borrar;  al  encontrarse  el  ordenador  con  un  REM,  salta  a la 
línea  siguiente  y no  ejecuta  lo  que  hay  detrás  del  REM. 

Otro:  Si  estamos  usando  el  juego  de  caracteres  del  usuario  y por  ejem- 
plo tenemos  un  gráfico  definido  en  la  letra  A y necesitamos  usar  esta  letra 
y el  gráfico  a la  vez,  sencillamente  cuando  queramos  usar  la  A.  la  pone- 
mos en  RVS/ON,  y para  el  gráfico  RVS/OFF. 

Javier  Sebastián  Segura.  17  anos. 
C/Puebla  de  Valverde  8-25.  Valencia -14 

Rutina  Margo 

Para  cambiar  el  inicio  de  Basic  y poder  mezclar  programas  de  disco  o de 
cinta  en  el  Commodore  64,  hay  que  tener  en  cuenta  que  las  lineas  del 
programa  que  se  añade  tienen  que  ser  más  altas  que  el  anterior  programa 
y hacer  poke  43,1:  poke  44,8  run  antes  de  unir  el  siguiente  programa. 
Ejemplo: 

Load  "Merge"  8,1  (Nombre  de  la  rutina) 

Run  (nos  imprimirá  POKE43,7??:POKE44.???).  entonces  si  posicionamos 
el  cursor  en  la  linea  de  texto  y presionamos  return  se  cambia  el  inicio  del 
basic  lo  podemos  comprobar  con  list  y no  aparecerá  el  programa  si  esto 
es  asi  cargamos  la  primera  parte  del  programa  con  Load  "programa",  8, 
luego  pondremos  POKE43,l:POKE44,8,  después  run.  saldrá  de  nuevo 
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POK  E43,7??:POK  E44,'’7'?,  y lo  mismo  que  antes  con  lisl  no  aparece  nin- 
gún listado  luego  otra  ve?  load  “programa",  8 etc...  Cuando  se  termine  de 
añadir  programas  hacer  POKE43.l:POKE“,8:LIST  y borrar  las  líneas 
1-6  que  son  del  programa  Merge,  después  guardarlo  si  se  quiere. 

1 11=1:  12=8:  1.1=11:  L2=12:  GOSUB5 

2 L I =PEEK(AD):L2=PEEK(  AD+ 1 ):GOSU  B5 

3 IFL1=0ANDL  2=OTHENL1=X1:L2=X2:GOSUB5:GOTO  6 

4 X 1=L  1 : X2=1.2;G0T02 

5 AD=0:AD=L2*256+L1:RETURN 

6 PRlNT"[CLR]POKE43,"Ll;”:POKE44,“L2;END 

READY  ./oré  Manuel  Moreno  Tobaruela 

C/Navarro  Villoslada.  10-3°  Deha.  Pamplona 

Goma  de  borrar 

Os  envió  un  truco  (si  es  que  se  puede  llamar  asi),  que  sirve  para  borrar 
de  la  memoria  un  programa  cuando  te  dan  a elegir  entre  continuar  en  él  o 
no. 

La  instrucción  es:  SYS  58232 

Con  ella,  en  la  pantalla  del  V1C  aparece  lo  mismo  que  si  lo  hubieras 
apagado  y encendido.  Alfonío  Sanz 

P"  San  Isidro,  5.  2° A.  Valladolid-12 

Nula:  La  instrucción  correcta  para  simular  totalmente  el  apagado  es:  SYS 
64802  para  el  V1C-20  y SYS  64738  para  el  C-64 

Instrucción  Auto 
C-64 

Os  envió  un  programa  para  la  sección  de  Magia  que  puede  interesar  a los 
usuarios  del  Commodore  64.  Ls  una  rutina  en  lenguaje  máquina  que 
realiza  la  instrucción  "AUTO”,  la  cual  los  ordenadores  Commodore  no 
poseen.  Esta  instrucción  genera  automáticamente  los  números  de  las  ins- 
trucciones correlativas  de  un  programa  en  Basic.  O sea,  el  programa 
empieza  en  la  linea  100,  y el  número  se  va  incrementando  automática- 
mente de  lOen  10(100,  120,  130, etc).  Para  salir  de  la  rutina  sólo  se  puede 
hacer  pulsando  RETIJRN  en  una  instrucción  en  blanco,  y para  volver  a 
ella  basta  teclear: 

SYS  46152 

Pero  de  esta  manera  volverá  a empezar  a la  instrucción  KM),  por  lo  que 
debéis  pulsar  RUN/STOP  y RESTORE  simultáneamente,  repetidas 
veces,  y aparecerán  los  números  de  instrucción  en  la  parte  superior 
izquierda  de  la  pantalla,  hasta  que  lleguéis  a la  instrucción  en  la  que 
queréis  continuar.  Aunque  aparezcan  los  números  solos,  esas  instruccio- 
nes no  se  borran.  La  rutina  empieza  en  la  localidad  49152  de  memoria. 
Para  utilizar  el  programa  después  de  haberlo  tecleado,  se  debe  almacenar 
en  cassette  o en  disco,  porque  al  ejecutarse  el  programa  se  borra  automá- 
ticamente (linca  50).  Antes  de  empezar  a programar  se  debe  cargar  y 
ejecutarlo  y el  número  de  instrucción  100  aparecerá  en  la  pantalla  Si  se 
desea  que  el  número  de  incremento  sea  diferente  de  10,  basta  POK  Lar  en 
la  localidad  de  memoria  49179  el  número  de  incremento  deseado. 

III  X=49I52 

20  READ  Y:IF  Y=-l  THEN  40 

30  POKE  X,  Y:  X=X+1:  Z=Z+Y:  GOTO  20 

40  II  /.  12374  THEN  PRINT  "ERROR  EN  LAS  SENTENCIAS 

DATA":END;  REM  si  Z es  diferente  de... 

50  SYS  49152:  NEW 

KM)  DATA  169.90,133,251.169,0.133,252,169,19,14,2,3,169.192,141,3.3. 
96,32,25. 

110  DATA  192.76,134,164.24.169,10,101.251,133.251.144,2.230.252.165. 
251,133,99 

120  DATA  165,252,133,98,162,144,56.32,73,188,32.221.189.162,0.189.1.1. 
240,9,32 

1 30  DATA  2 1 0,255, 1 57,0,2,232.208.242.32, 1 8.225,20 1 . 1 3.240.3,76. 105. 1 65. 
56,165 

140  DA  I A 251,233.20,176,2.198.252,169,131.141,2,3.169,164.141.3.3,76. 
118,165,1 

Podéis  resumir  las  instrucciones  de  manejo  donde  os  parezca  conve- 
niente- Pedro  Obrador  Espinosa 

C/Cosla  I Uobera.  12.  Aria  (Mallorca) 

Quinielas  de  14 

Primero  os  quiero  felicitar  por  la  revista  tan  buena  que  hacéis.  Me 
llamo  Javier  Recio  Lamata  y tengo  un  VIC-20,  soy  lector  de  la  revista  y vi 
que  un  lector  quería  un  programa  para  hacer  quinielas,  pues  bien  yo  lo 
tengo  y os  lo  envío: 

10  FOR  A=l  TO  14 
20  L=1NT  (RND(1)*10)+I 

30  IF  L<  =5  THEN  PRINT  "PARTIDO";A:"-SIGNO  I" 

40  IF  L>  =5  AND  L<  9 THEN  PRINT  "PARTlDO";A"-SIGNO  X" 
50  II  L>8  AND  L<  = 10  FUEN  PRINT  "PART!DO";A:"-SIGNO  2" 
60  NEXT  A 
70  ENÜ 

Este  programa  da  una  probabilidad  del  50%  para  el  signo  1.  del  30% 
para  el  signo  X y el  20%  para  el  signo  2,  se  simula  el  lanzamiento  de  un 
dado  de  10  caras.  Javier  Recio 

Fernán  Caballero,  n-  22.  Sevilla-I. 


Pajaritos 

Estas  lineas  se  pueden  utilizar  como  subrutina  cuando  se  necesite  un 
sonido  de  pajarillos  en  el  VIC-20  con  el  SUPEREXPANDER. 

10  FOR  K=1  TO  20 

20  FOR  L=254  TO  240+INT(RND(l)*10)  STEP  -1 

30  SOUND  0.0.L.0.I5 

40  NEXT  L 

50  SOUND  0,0 .0.0,0 

60  FOR  L=0  TO  INT(RND(I)*100)+I20 

70  NEXT  L 

80  NEXT  K 

Francisco  Sacz 

C/ Virgen  del  Rosario,  28.  Alcantarilla  (Murcia) 

VIC-Travesti 

Envío  un  pequeño  programa  para  el  VIC-20  que  se  podia  titular  “VIC 
Travestí”,  pues  al  hacer  RUN  no  sólo  cambia  al  imprimirlo  el  nombre  de 
hombre  del  programa  a otro  de  mujer  sino  que  lo  deja  modificado  en  el 
mismo. 

10  A$="JUAN":PRINT(CLR):A=256*PEEK(642) 

20  FOR  N=1  TO  4:  READ  B:  POKEA+8+N.B:NEXT;PRINT  AS 
30  DATA  76,  79,  76,  65 

Federico  I borra 
C/Comandante  Zorita,  8.  Madrid-20 

De  un  Commodoriano 

Os  envío  un  truco  para  nuestra  querida  sección  de  magia.  Ahi  va: 

Si  os  molesta  el  parpadeo  del  cursor  en  el  VIC.  y os  gustaría  hacerlo 
desaparecer,  simplemente  teclead: 

POKE  788.225.  El  cursor  ya  no  parpadeará. 

Si  por  el  contrario  queréis  que  desaparezca,  escribid: 

POKE  788,255 

Si  queréis  borrar  la  pantalla  (como  bariais  con  un  run  stop/ restore) 
Teclead: 

POKE  789,0 

Que,  ¿os  han  gustado  las  magias'.’ 

P.D.  No  os  quejéis,  sí  me  he  "pasao"  haciendo  preguntas,  pero  es  que 
es  la  primera  vez  que  escribo. 

••adcu" 

Leonardo  Garda  Fonl 
C/Centro  n”  21.  Piso  I"  /".  fíarcelona-26 


Robot  de  Control 

Queridos  VIC-ciosos,  mando  a continuación  las  direcciones  de  memo- 
ria para  el  VIC-20,  con  distintas  ampliaciones,  que  la  hacen  variar: 
3k-1024:4O95 

más  de  8 u 8k  -4096:7679  (la  memoria  de  color  pasa  a -37888:38399). 
Espero  que  si  compráis  una  ampliación  de  memoria  no  se  os  ocurra  como 
a mí  que  no  podia  utilizarla  en  muchas  ocasiones. 

Mando  también  unos  POKES  muy  útiles: 

POKE  650,128:  repetición  de  todas  las  teclas 
POKE  650,100:  anula  dicha  repetición 

POKE  646  n“  del  color:  color  del  cursor  (0=ncgro,  I blanco... | 

POKE  656,128:  simula  RUN/STOP-RESTORE 

Gonzalo  Vida! 
C/Tilos,  29.  Madrid-23 

“Función  tono” 

El  presente  mini-programa  dibuja  en  el  VIC-20  la  función  seno;  si  bien 
la  resolución  no  es  muy  buena,  que  digamos,  ahi  va,  por  si  a alguien  le 
interesa: 

10  PRINT  “(CLR|":  POKE  36879,  110:  FORN=0TO2I: 

POKE  7922+N+22*INT  (1  l*SIN(N* T/10,5)).  42: 

NEXT 

Si  queréis  aumentar  la  frecuencia  no  tenéis  más  que  multiplicar  por  2 el 
numerador  del  argumento  de  la  función  SENO.  Y si  queréis  aumentar  la 
resolución,  colocar  un  STEP. 5 en  el  bucle  FOR... NEXT. 

Espero  que  os  guste. 

Octavio  Navarro  C áceres.  17  años. 
Cira.  Fuente  Encina.  101,  2‘‘  3". 
Sla.  Coloma  de  Gramanet  (Barcelona).  Tfno.:  391  89  50 

Decimal  a Binario 

Aquí  os  va  un  programa  de  una  sola  linea  que  transforma  un  número 
decimal  en  binario. 

10  INPUTN:  FOR  A=0  TO  7:  S=2f  A:  W$=RIGHT$  (STRS((N  AND  S) 
/S,lj+W$:  NEXT:  PRINT  WS 

Como  véis  es  muy  sencillo,  a ver  si  lo  podéis  hacer  más  corto. 

Miguel  Angel  Folgado  Costa 
Avda.  Blasco  Ibáñez,  29,  1°.  Manises  (Valencia). 
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CORTO  BIAN 


UTILIZAR  EL  JOYSTICK 


Hola,  hace  poco  os  man- 
dé un  truco  de  magia  y 
ahora  os  ruego  que  me 

hagáis  un  favor.  Hace 

unos  dias  compre  un  Joystick  y lo  probé 
con  dos  o tres  programas  que  saqué  de 
unas  revistas.  Al  cabo  de  unos  días  decidí 
adaptar  unos  juegos  para  moverlos  con  el 
Joystick.  Miré  las  revistas  en  el  número  6 
y vi  los  PEEKs  para  leer  el  movimiento 
del  Joystick,  y con  ayuda  de  los  progra- 
mas anteriores,  intenté  adaptar  los  nue- 
vos programas  o intentar  hacer  yo  uno: 
no  lo  conseguí.  Creo  que  seria  adecuado 
dedicar  un  artículo  en  vuestra  revista  a la 
utilización  del  Joystick  y la  rutina  necesa- 
ria para  que  el  ordenador  lo  lea. 
CHARLY  - (BARCELONA) 


Tomamos  nota  de  tu  petición,  no  obs- 
tante como  ya  habrás  visto  lo  único  que 
necesitas  para  leer  el  joystick  es  hacer 
PEEK(56320)  o PEEK(S632I),  dependiendo 
del  FORT  que  vayas  a usar  (el  I ó el  2). 


CAMBIO 

CASSETTES 


-Por  razones  industriales- 

entrego  el 
modelo  nuevo  con 
total  garantía 
a cambio 

del  antiguo 

* 

o 

compro  el  antiguo 


SERPRO 

Teléf.:  (93)  230  48  05 


MANUAL  DEL  SUPEREXPANDER 


Soy  José  Forns  un  sus- 
criptor  de  vuestra  revista, 
y ahora  me  dirijo  a voso- 
tros por  tener  un  grave 


problema  con  el  cartucho  del  superex- 
pander.  Este  problema  se  refiere  a la 
ROM  de  éste  y es  que  hay  una  infinidad 
de  comandos  que  no  sé  para  qué  sirven  ni 
cómo  se  utilizan,  estos  son:  SCNCLR, 
SOUND,  RGE,  RCOLOR,  RDOT,  RPOT, 
RPEN,  RJOY  y RSND. 

De  estos  comandos,  la  verdad,  sé  que 
existen  porque  vosotros  en  vuestro  anun- 
cio de  contraportada  de  algunos  números 
los  exponéis  pero  si  no  los  hubierais  puesto 
ni  los  conocería.  Luego  hay  otros  coman- 
dos que  me  suenan  y sé  para  qué  sirven 
pero  no  los  sé  usar  pues  al  utilizarlos  me 
dan  error  de  sintaxis:  estos  son:  KEY, 
COLOR.  PAINT. 

En  este  último  en  concreto  no  sé  cómo 
pintar  sectores  circulares  sin  que  invadan 
los  sectores  circulares  colindantes  pinta- 
dos de  otro  color. 

Me  gustaría  también  que  me  contarais 
si  es  que  es  posible  el  grabar  en  cinta  úni- 
camente lo  que  es  la  pantalla  en  un  pro- 
grama, por  ejemplo  del  programa  de  grá- 
ficas tridimensionales  el  poder  grabar 
sólo  el  dibujo  ahorraría  muchíííísimo 
tiempo.  Bien,  no  os  entretengo  más,  espe- 
rando que  me  publiquéis  la  respuesta  se 
despide  vuestro  amigo. 

JOSE  FORNS  ANELO 
C/VILAMAR!,  33.  3"  /*. 

BARCELONA. 


Como  ya  habrás  visto,  en  el  número  6, 
comenzamos  a publicar  el  manual  del  super- 
expander  en  castellano.  Espero  que  esto  te 
solucione  tus  problemas. 

Para  grabar  en  cinta  sólo  el  contenido  de 
la  pantalla,  deberás  hacerlo  desde  una 
rutina  de  código  máquina  similar  a la 
publicada  en  el  número  6 (“salvaguarda  de 
memoria  en  periféricos"),  pero  con  distin- 
tas posiciones  de  memoria,  ya  que  esta  se 
coloca  a partir  de  la  SC000,  y tú  deberás 
colocarla  en  donde  tengas  RAM. 


PRECIO,  PASCAL  Y PET  SPEED 


Soy  uno  de  los  antiguos 
suscriptores  de  CLUB 
COMMODORE  desde  el 
10  aunque  los  tengo 


todos,  también  soy  uno  de  los  que  com- 
praron un  CBM-64  por  1 10.000  ptas.  para 
observar  con  consternación  que  una 
semana  después  su  precio  pasaba  a ser  de 
79.000. 

Cuando  compré  el  ordenador,  en  la 
propaganda  aparecía:  ...lenguajes  que 
puede  utilizar  con  UCSD  PASCAL... 
También  hay  a su  alcance  un  compilador 
de  BASIC  llamado  PET  SPEED. 

En  la  propaganda  que  aparecía  en  Club 
Commodore  decía:  ...están  en  fase  de 
desarrollo  asimismo  otros  lenguajes  como 
Ucsd  Pascal.  Y ya  habían  desaparecido 
las  referencias  a Pet  Speed. 


En  la  propaganda  actual  siguen  estando 
en  fase  de  desarrollo  algunos  lenguajes, 
pero  el  Pascal  no  ¿Esto  qué  significa,  ya 
está  desarrollado  y lo  veremos  aparecer 
próximamente,  o no  sabremos  nunca  más 
de  él?,  ¿Salió  de  nuestro  alcance  el  Pet 
Spedd?  Agradecería  me  dieran  respuesta 
a estas  preguntas,  o se  pudieran  poner  en 
contacto  con  MEC  para  que  ellos  las  res- 
pondieran, junto  con  estas  otras. 

¿Para  cuándo  la  extensión  del  Basic  que 
ofrecía  cien  nuevas  sentencias  al  lenguaje 
normalizado,  entre  ellas  sentencias  estruc- 
turadas, generadores  de  sonido  y gráficos 
simplificados? 

Quizás  haya  salido  y esté  en  el  catá- 
logo con  otro  nombre,  de  ser  así,  me  gus- 
taría conocerlo. 

Ahora  unas  preguntas  de  carácter  más 
técnico; 

¿Qué  significa  la  R de  cp/m  (r)?  Es  este 
CP/M  el  standard  compatible  con  Apple, 
Sharp,  Osborne,  o cualquier  otro  aparato 
que  posea  CP/M  80? 

¿Es  imprescindible  o muy  necesaria  la 
posesión  de  2 drives  para  poder  ejecutar 
con  normalidad  los  programas  escritos 
bajo  este  standard? 

¿Es  posible  utilizar  simultáneamente  en 
CP/M  mayúsculas  y minúsculas?  algunos 
lenguajes  como  el  Prolog,  así  lo  exigen. 

¿Hay  alguna  posibilidad  de  ampliar  el 
formato  de  pantalla  a 80  columnas? 

¿Sigue  siendo  posible  acceder  bajo  el 
CP/M  a la  alta  definición  y los  sprites? 

Sé  que  la  carta  es  larga  y las  preguntas 
muchas,  pero  considero  que  las  respues- 
tas, ofrecerán  mucha  luz  a usuarios  como 
yo  que  desean  sacar  el  máximo  rendi- 
miento a su  aparato,  de  acuerdo  a las 
especificaciones  que  Commodore  ofrece 
de  su  aparato. 

Se  despide: 

LUIS  PARIS  GARCIA 
CTRA.  V1C  119-121 
MANRESA  (BARCELONA) 


En  el  número  anterior,  aparecieron  dos 
cartas  contestadas  por  MEC  que  pueden 
contestar  a tus  preguntas,  pero  como  noso- 
tros hemos  conseguido  referencias  de 
casas  que  disponen  del  lenguaje  PASCAL 
para  el  C-64  fuera  de  España,  te  damos  las 
señas  que  para  puedas  pedir  información: 

— La  casa  ABACUS  Software  de  Grand 
Rapids  ( Michigam ),  tiene  comercializado 
desde  hace  poco  más  de  un  año  un  compila- 
dor PASCAL  para  el  C-64  denominado 
“ZOOM  Pascal  64",  según  la  información 
de  que  disponemos  es  rápido  ya  que  pro- 
duce código  máquina  directamente  ejecu- 
table por  la  CPU,  no  pseudocódigos.  El 
paquete  está  compuesto  por  un  editor  (para 
crear  y modificar  programas  en  Pascal),  un 
compilador  que  traduce  el  Pascal  a un 
código  intermedio,  y un  convertidor  que 
pasa  el  código  intermedio  a código 
máquina.  Además  viene  un  manual  com- 
pleto y varios  programas  de  demostración. 

— En  mayo  del  84,  la  casa  Data  Becker 
ha  lanzado  una  nueva  versión,  la  3,0,  de  su 
Pascal  para  el  C-64.  De  momento  sólo 
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hemos  conseguido  tener  la  noticia  de  su 
lanzamiento,  pero  intentaremos  conseguir 
más  información,  si  deseas  pedirla  tú 
mismo  puedes  hacerlo  a la  casa  en  Alema- 
nia: 

DATA  BECKF.R 
Merowinger  str.  30 
4000  Dusseldorf 
Tel.:  07-49-211-310010 
El  Pet  Speed  no  ha  “ salido  de  nuestro 
alcance’’,  se  trata  de  un  programa  de 
Oxford  Computer  Systems  ltd.,  Hensington 
Road,  W óodstock  Oxon.  Tel.:  07-44-993- 
812700. 

La  extensión  al  Basic  que  prometió 
Micro  Electrónica  y Control  está  en  el 
mercado  desde  hace  varios  meses  (lo  vi  en 
distribuidores  a primeros  de  mayo  estaba). 
Su  nombre  es  Simón' s Basic. 

La  R en  el  nombre  es  para  indicar  que  se 
trata  de  una  marca  registrada  (en  este  caso 
por  Digital  Research).  Es  compatible  en 
tanto  en  cuanto  es  CPM,  pero  esto  no 
quiere  decir  que  un  disco  del  Apple  lo  pue- 
das cargar  en  un  Osborne  ni  en  un  C-64,  ya 
que  los  formatos  de  grabación  en  disco  son 
distintos. 

Los  dos  drives  no  son  imprescindibles 
para  utilizar  el  CPM  del  C-64,  pero  es  difí- 
cil trabajar  CPM  del  C-64,  pero  es  diji- 
podrás  comprenderlo  si  te  compras  cual- 
quier libro  de  introducción  al  CPM  y lo 
estudias  un  poco. 

Las  mayúsculas  y minúsculas  funcionan 
igual  que  normalmente.  Lo  de  los  sprites  no 
te  lo  puedo  contestar  porque  no  lo  he  pro- 
bado. 

JUEGOS  PARA  EL  700 

Amigos  de  Commo- 
ilorc  World,  antes  de 
todo,  quiero  felicitaros 
por  esa  magnífica  revista 
que  habéis  creado.  Os  envió  tres  faenas. 
Ahí  van: 

1 . ¿Existe  algún  tipo  de  software  (juegos, 
etc.),  aparte  del  soft  serióte  para  el  CBM- 
700'.’  ¿l’ucdc  crear  gráficos? 

2.  ¿Puede  ampliarse  realmente  el  V1C-20 
a 64 k?  En  el  número  5 de  Commodore 
World,  pusisteis  un  anuncio  que  hacia 
referencia  a eso,  pero  he  preguntado  en 
algunas  tiendas  importantes  y no  saben 
nada  del  asunto.  Si  fuera  asi,  se  acercaría 
a la  compatibilidad  con  el  C-64?  Otra 
cosa,  ¿cuál  es  mi  número  de  socio? 

3.  Y van  tres.  Como  un  Vic-cioso  que 
soy.  os  envío  un  truco  para  nuestra  que- 
rida sección  de  magia.  Ahí  va: 

Si  os  molesta  el  parpadeo  del  cursor  en 
el  VIC,  y os  gustaría  hacerlo  desaparecer, 
simplemente  teclead: 

POKE  788,225.  El  cursor  ya  no  parpadeará. 

Si  por  el  contrario  queréis  que  desapa- 
rezca, escribid: 

POKE  788,255 

Si  queréis  borrar  la  pantalla  (como 
haríais  con  un  run  stop/ restore) 

Teclead: 

POKE  789,0 

Qué  ¿os  han  gustado  las  magias? 


P.D.  No  os  quejéis,  si  me  he  “pasado" 
haciendo  preguntas,  pero  es  que  es  la 
primera  vez  que  escribo. 

“adeu" 

LEONARDO  GARCIA  PONT 
C/CENTRO  N°  21.  PISO  1Q  1‘. 
BARCELONA 

1.  No  tenemos  ninguna  lista  de  juegos 
para  el  7 00,  no  hay  ningún  motivo  por  el 
que  no  se  puedan  diseñar  juegos,  de  hecho 
el  controlador  de  vídeo  que  utiliza  el  CBM 
700  puede  dar  un  número  de  pixels  mucho 
mayor  que  el  de!  Commodore  64.  La  única 
causa  que  limita  la  utilización  del  700  para 
juegos  es  su  precio,  si  piensas  comprarte  un 
ordenador  para  jugar,  ¿no  te  parece  dema- 
siado caro?  Quien  compre  este  ordenador 
seguro  que  no  ha  pensado  en  él  para  dedi- 
carlo a juegos. 

2.  Estamos  esperando  que  esta  casa  nos 
envíe  ¡a  tarjeta  para  hacerles  la  reseña, 
cuando  lo  hagamos  te  podré  contestar  más 
seguro,  de  momento  te  puedo  decir  que  el 
VlC-20  puede  direccíonar  hasta  40  KRA.M, 
no  sé  si  al  resto  accede  por  medio  de  con- 
mutaciones de  bancos  de  memoria. 

3.  Hemos  pasado  tu  truco  a la  sección  de 
magia. 

MAS  ERRORES  DEL  MANUAL 

Le  felicito  por  su  revista 
que  leo  todos  los  meses, 
aunque  hace  muy  poco 
que  me  compré  un  Com- 
modore 64.  Encontré  muy  útil  su  artículo 
"Comando  Oíd"  del  n®  3. 

Leyendo  el  "Manual  del  Usuario"  del 
Commodore  64,  he  encontrado  algunos 
errores. 

En  la  pág.  78,  en  la  línea  30  falta  un  2. 


En  la  pág.  86,  las  explicaciones  de  las 
líneas  del  programa  están  equivocadas. 

En  la  pág.  88,  en  la  línea  20  debería 
poner  READF. 

La  linea  460  de  la  pág.  145  es  innecesa- 
ria, ya  que  es  igual  que  la  500. 

En  la  linca  630  de  la  pág.  146.  el  “3” 
debería  de  ser  “S". 

En  la  pág.  156,  en  el  Registro  n®  23, 
debe  leerse  AMPLIACION  SPRITE  Y. 

En  la  pág.  147,  la  variable  K$  de  la  linea 
220  tiene  mal  sus  5 últimos  términos. 
Estos  tienen  que  ser  "@-*£  t ".  En  la  línea 
280  hay  un  extraño  REME  16+64,  que 
impide  al  programa  ejecutar  el  POKE  que 
le  sigue.  Por  último  no  entiendo  para  qué 
sirve  la  subrutina  que  comienza  en  la 
linea  800.  El  programa  nunca  la  ejecuta. 
ALFREDO  TORRES  SATZ 
C/CENIA  N°  6 I"  D 
50016  - ZARAGOZA 

Gracias  por  enviarnos  todos  tos  errores 
que  has  encontrado,  de  este  modo  podemos 
ir  publicándolos  y servirán  de  ayuda  a otros 
usuarios  de  los  equipos  Commodore. 

Imagino  que  la  rutina  de  la  línea  800, 
debería  ser  la  que  utilizó  al  principio  el 
autor  del  programa  en  lugar  de  la  línea 
300,  no  sé  por  qué  no  la  quitó  del  programa 
cuando  ya  no  la  necesitaba,  seguramente 
fue  un  olvido. 

COMANDO  OLD 

Agradeceré  se  pongan  en 
contacto  con  Diego  Rome- 
ro Sabio,  ya  que  en  la 
revista  n®  3 de  abril  1984 
página  38  presenta  un  listado  “Comando 
Oíd"  yo  con  mi  C-64  lo  he  efectuado  pero 
no  he  obtenido  resultados,  quizás  esté 


VENTA  DE 
ORDENADORES 


EN  VALLADOLID 


fj  commodore 

* COMPUTER 


Accesorios,  programas  profesionales,  juegos 

C/Duque  de  la  Victoria,  13 

APRENDE  A PROGRAMAR 
POR  ORDENADOR 

• Cursos  intensivos  de  verano. 

• Clases  muy  reducidas,  horario  flexible. 

• Profesores  capacitados. 

• Cada  alumno  dispondrá  de  un  ordenador. 

20  CLASES  GRATIS  AL  COMPRAR  UN  C-64 

KENT  ELECTRONICA 

C/Magallanes,  1-1«A  - VALLADOLID. 
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...SEAMOS  PREGU 


diseñado  para  el  V1C-20,  no  lo  sé,  según 
la  revista  al  final  del  artículo  “El  misterio 
de  los  Pokes"  dice  que  para  cualquier 
duda,  que  le  enviemos  las  cartas  a la 
revista,  por  eso  les  digo  al  principio  que  se 
pongan  en  contacto  con  él. 

RAFAEL  ORTIZ  HERNANDEZ 
802  ESCUADRON  S.A.R. 

BASE  AEREA  DE  GANDO 
(LAS  PALMAS) 

El  listado  que  aparece  en  el  artículo 
“ Comando  Oíd"  sirve  indistintamente 
para  el  C-64  y el  VlC-20,  con  ese  pro- 
grama cargas  en  memoria  una  rutina  en 
código  máquina  que  graba  en  el  datassette 
otro  programa  de  sólo  dos  bytes  que  es  el 
que  sirve  para  recuperar  los  programas. 

Para  recuperar  un  programa  debes  pul- 
sar la  “ tecla  de  reset",  y luego  hacer 
LOAD  del  programa  de  dos  bytes.  ¡No 
hagas  run  antes  de  pulsar  "stop  y restore”! 
Es  mejor  que  nos  llames  por  teléfono  si 
sigues  sin  conseguir  nada,  quizás  tengas 
algún  fallo  y no  puedo  imaginar  cuál  es  si  ’ 
no  me  das  más  pistas. 

SIGLAS  MISTERIOSAS...  CODIGOS 
SECRETOS 

Me  gustaría  haceros  una 
pregunta: 

¿Qué  es  eso  de  RTTY  y 
CW?  ¿Son  programas? 
¿Interfaces?  ¿Para  qué  sirven?  y otra  más: 
¿conocéis  algún  juego  de  estrategia  para 
el  V1C? 

MARIO  DIEZ 

C/COMANDANTE  ZORITA.  25 
MADRID 

RTTY  es  la  abreviatura  de  Radio- 
teletipo  y CU  es  la  de  telegrafió  por  interrup- 
ción de  portadora,  no  son  ni  programas  ni 
interfaces,  son  modos  de  transmisión  de 
información  utilizados  generalmente  por 
aficionados,  agencias  de  noticias,  servicios 
de  comunicación  militares,  etc.  Sirven  para 
enviar  por  radio  los  mensajes  entre  dos 
estaciones. 

De  momento  no  tenemos  reseña  de  nin- 
gún juego  de  estrategia,  pero  tan  pronto 
como  la  tengamos  la  publicaremos. 

MOSQUITO  MOSQUEANTE 

Ruego  que  me  digáis  la 
frase  1040  del  programa 
"mosqueando  al  mosqui- 
to", pues  no  me  sale. 


CENTRO  DE 
INFORMATICA 

Las  Rozas  - Majadahonda 
EMPEZAMOS 
Cursillos  en  BASIC 
cada  1 5 días 

Directamente  en  ordenadores 
VlC-20,  COMMODORE  64 
SPECTRAVIDEO 

Teléfono:  637  31  51 


Atentamente 
ALVARO  MARUGAN 
AVDA.  DEL  SEGRE  N°  16 
PUIGCERDA  (GERONA) 

Esa  línea  se  encarga  de  transferir  los 
datos  de  los  sprites,  la  línea  publicada  es 
correcta,  la  repetimos  por  si  pareció 
borrosa  en  tu  ejemplar. 

1040  FOR  1=0  TO  62:  READ  Z:  POKE 
832+  I,Z:NEXT 

QUIERO  DERROCHAR  MEMORIA 

Considero  a Commodore 
World,  como  una  buena 
revista,  aunque  también 
es  verdad  que  todavía 
falta  algo  de  “rodaje". 

Peca  de  exceso  de  juegos  y falta  de  pro- 
gramas de  utilidades  técnicas. 

Yo  tengo  un  VIC-20  con  la  máxima 
configuración  (32k)  y para  almacenaje  un 
cassette. 

Y ahora  les  realizo  mis  dos  preguntas: 

¿Por  qué  todavía  no  existen  programas 

para  sus  32k? 

Cuando  es  un  ordenador  que  todavía  le 
queda  mucho  por  potenciarse. 

Y la  segunda  pregunta  es  la  siguiente: 

¿Existe  algún  programa  u orden  por  la 

cual  se  pueda  aumentar  la  velocidad  de 
grabación  de  carga  y grabación  en  cas- 
sette? 

GUILLERMO  LOPEZ  HIDALGO 
C/ ENTRE  ARROYOS,  29 
MADRID. 

Programas  para  el  VIC-20  con  32K  exis- 
ten, la  mayoría  de  los  programas  de  Bases 
de  Datos  suelen  necesitar  mucha  memoria, 
sobre  todo  si  no  tienes  disco,  también  los  de 
contabilidad,  proceso  de  texto,  etc.,  todos 
estos  programas  limitan  su  número  de 
registros  o datos  en  función  de  la  memoria 
disponible,  y aunque  en  la  propaganda  te 
dicen  que  son  para  el  VIC+8K  o +16K, 
permiten  trabajar  con  más  datos  si  dispo- 
nes de  más  RAM. 

Existen  varios  programas  para  acelerar 
la  velocidad  de  grabación  y carga  de  cas- 
sette, entre  ellos  están  el  Fast  Turbo  y el 
Arrow.  En  la  revista  han  aparecido  anun- 
ciados algunos. 

¡BUSCO  EL  MAPA! 

Aprovecho  para  felici- 
tarles por  la  revista  que 
es  muy  buena  y da  un 
nivel  bastante  superior  a 
otras  publicaciones  españolas  sobre  el 
tema  ¡que  no  decaiga! 

También  me  gustaría  preguntarles 
(tengo  mi  Commodore-64  desde  hace  1 
semana)  acerca  de  los  mapas  de  memoria 
y el  poder  del  Poke  y peek,  creía  que  estas 
instrucciones  tan  sólo  direccionaban  memo- 
ria RAM,  sin  embargo  he  visto  que  pue- 
den direccionarse  registros  de  E/S  ¿Dónde 
puedo  conseguir  un  mapa  de  memoria 
claro  y completo? 


¿Quizá  la  guia  del  programador? 
(Todavía  no  la  tengo)  ¿Donde  comienza 
la  RAM  que  puedo  utilizar  libremente? 

En  el  n°  4 de  la  revista  se  comentan  un 
poco  estos  aspectos  sin  embargo  no  ter- 
mino de  tenerlo  claro  y si  me  aclarasen 
estas  dudas  les  quedaría  agradecido. 
CESC  SASAL  LASAOS  A 
C/M.  FALLA.  24,  2 » 3° 

BARCELONA 

El  mapa  de  memoria  completo  aparece 
en  la  guia  de  referencia  del  programador 
del  Commodore  64. 

Normalmente  la  RAM  disponible  para  el 
usuario  comienza  en  la  dirección  $0801, 
que  es  la  2049  en  decimal. 


Poseo  un  Commodore 
64  y deseo  saber  si  es 
posible  que  como  ocurre 
en  otros  microcompula- 
dores,  un  programa  que  está  cargado 
"arranque"  de  modo  automático. 

Muchas  gracias  por  adelantado,  un 
afectuoso  saludo. 

ANGEL  JIMENEZ  ROMERO 
C/RAMIREZ  ARELLANO,  6 
CORDOBA  - TELEF:  479  750 

Si  deseas  que  el  programa  arranque  sólo 
después  de  cargarse,  debes  cargarlo  pul- 
sando las  teclas  Run/Stop  y Shift,  esto 
equivale  a teclear  LOAD  y RUN. 

Si  lo  que  quieres  es  que  arranque  aunque 
tú  tecleas  sólo  LOAD,  deberás  interceptar 
el  sistema  operativo  del  microordenador  tal 
y como  lo  hacia  el  programa  “ comando 
OLD". 

¡QUIERO  QUITAR  LAS 
PROTECCIONES! 

Me  he  comprado  un 
programa  en  cinta  que 
he  querido  listarlo,  pero 
que  no  ha  sido  posible  ya 
que  al  grabarlo  se  ejecuta  automática- 
mente y sin  hacer  caso  a las  teclas 
“Run/Stop  y Restore". 

Me  gustaría  me  dijeran  si  hay  alguna 
forma  de  listarlo  o de  grabarlo  en  otro  cas- 
sette. 

También  hace  unos  dias  que  al  leer  en 
una  cinta  me  sale  error.  El  error  me  sale 
en  2 programas,  en  los  otros  no  me  sale 
error. 

El  error  de  esos  dos  programas  puede 
ser  debido  a que  hayan  sido  mal  grabados 
o a que  esté  estropeada  ese  trozo  de  cinta. 

Uno  de  los  2 programas  hace  unos  días 
que  iba  perfectamente  bien  ¿Dónde  puede 
estar  el  error? 

Sin  nada  más  que  preguntar  se  despide 
atentamente. 

JOSE  MARSA  MALLOL 
PRATS  Y ROQUE.  32 
BARCELONA 

La  mayoría  de  los  programas  que  puedes 
encontrar  en  el  mercado  se  encuentran  pro- 


AUTO-RUN 
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tes  en  el  programa  MATtDET  LINEAS 
50,  120  y 50,  140 

Como  los  corchetes  los  usan,  según 
dicen  en  la  clave  para  interpretar  los  lis- 
tados, para  indicar  qué  secuencia  de 
teclas  hay  que  usar.  Por  favor  indiquen  a 
qué  equivale  ese  error  entre  corchetes. 

Así  mismo  el  programa  sobre  cómo 
volver  a definir  teclas  de  funciones  (Nu  5, 
pág.  12).  No  cabrá  en  la  memoria  del  C- 
64.  Se  le  acabó  la  memoria  cuando  falta- 
ban dos  lincas  de  DATAS: 

Y ya  de  paso  corrijan  un  pequeño  error 
del  programa  Artillería  para  el  C-64  de  la 
revista  nfl  2.  En  la  linea  5 pone  POKE  P 0 
y debe  poner  POKE  BO. 

JORGE  LOZANO 
C/ SUBIDA  DE  S.  ANDRES.  I 
AINZON  - ZARAGOZA 

La  corrección  del  programa  "Arácnida" 
salió  publicada  en  el  número  6.  >'  la  de 
“Mat+Det"  en  este  mismo  número. 

Lo  del  programa  para  utilizar  las  teclas 
de  función  se  debe  seguramente  a algún 
POKE  que  hiciste  antes  de  teclear  el  pro- 
grama. 

En  artillería  64  efectivamente  tienes 
razón,  debe  ser  BO  en  lugar  de  P0. 


tegidos,  esto  lo  hacen  las  casas  para  evitar 
Por  eso  no  responden 


las  copias  “piratas 
las  teclas  de  S T OP  y RES  T ORE,  tampoco 
protección.  No 


puedes  listarlo  por  la  misma . 
te  podemos  decir  cómo  desprotegerlo  por- 
que las  protecciones  pueden  ser  de  muchos 
tipos. 

Los  errores  de  cinta  pueden  ser  causados 
por  pequeño  desajuste 


\imut  de  la 
cabeza,  quizás  el  sello  de  laca  esté  despren- 
dido y el  tornillo  puede  haber  girado  un 
poco,  alterando  la  posición  de  la  cabeza 
lectora  tan  poco  que  es  suficiente  para  que 
algunos  programas  grabados  con  otro 
ángulo  no  entren  pero  no  lo  suficiente  para 
que  no  entre  ninguno. 

Puedes  comprobar  si  la  laca  del  tornillo 
se  ha  desprendido,  retocar  un  poco  el  ajuste 
(lo  mejor  es  hacerlo  con  instrumental,  pero 
por  tanteo  también  es  posible),  >'  volver  a 
precintarlo  con  una  gota  de  laca  de  uñas. 


Z~  Soy  asiduo  lector  de 

Commodore  World,  y 

/ mi  forma  de  adquirirlo 

_ _J  es  comprándolo  en  quios- 

cos o tiendas  especializadas,  en  vez  de  la 
consabida  suscripción.  Esto  es  debido  a 
que  desconfío  plenamente  de  estos  ner- 
vios por  correo,  ya  que  son  múltiples  los 
robos  de  grandes  sobres,  a medio  intro- 
ducir, de  los  buzones  domiciliarios. 

Sólo  quiero  hacerles  un  par  de  sencillas 
preguntas. 

1 ) en  su  ne  4 del  mes  de  mayo  no  especi- 
fican para  qué  aparato  es  el  juego  “Viaje 
lunar",  como  viene  siendo  habitual 
(buena  costumbre). 

2)  En  la  parte  baja  del  mismo  pro- 
grama, pág.  34,  se  añaden  unas  lineas  nü 
10,  20  y 30,  ¿A  qué  corresponden? 

A.  A.  (BILBAO) 

El  programa  “Viaje  Lunar",  al  igual  que 
el  “ Mastermind ”,  es  de  José  Vicente  López 
Navarro,  y como  dice  en  el  recuadro  donde 
aparecen  sus  señas,  es  para  el  VIC-20. 

Por  un  error  de  imprenta,  apareció  en 
primer  lugar  los  títulos  y las  explicaciones 
de  los  dos  programas  y luego  los  dos  lista- 
dos, por  tanto  las  lineas  que  aparecen  en  la 
parte  baja  son  en  realidad  las  primeras  del 
listado,  y el  resto  aparece  en  ¡a  página  35. 


Al  querer  escribir  el  pro- 
grama Aracnida  en  la 


/ \ línea  60  pone  PR1NT 

3 “(ERROR)” 

También  ponen  ERROR  entre  corche- 


NOTICIAS  COMMODORIANAS 


Finalmente,  se  sorteó  un  VIC-20  y el  pro- 
grama Sargon  II,  obsequio  del  ayuntamiento  de 
Badajoz  y de  "Control  y Sistemas",  resultando 
ganador  el  niño  Javier  Millán  .Núñez,  de  12  años 
de  edad. 


Las  fiestas  patronales  de 
Palencia  con  ordenador 


La  Asociación  l’alentina  de  Usuarios  de 
Ordenadores  Personales  (A.P.U.O.P.)  nos  comu- 
nica que  en  septiembre  tendrá  lugar  una  activi- 
dad informática  de  cara  a la  ciudad  de  Palencia. 

Dicha  actividad  consistirá  en  la  instalación  en 
la  Plaza  Mayor,  coincidiendo  con  las  Fiestas 
Patronales,  de  una  caseta-exposición  con  diver- 
sos equipos  y material.  Todo  ello  en  un  intento  de 
acercar  a la  ciudad  el  mundo  de  la  informática  y 
de  los  Microordenadores. 

La  instalación  será  patrocinada  por  el  ayun- 
tamiento que  cede  la  caseta  y sus  instalaciones  y 
por  la  firma  comercial  “La  Esfera"  que  presta 
los  equipos. 


VIC-20 

Tarjeta  64K-RAM  + 2K  LPROM 
Tarjeta  2K  + 2K  EPROM 
Tarjeta  40/80  columnas  + 

3.5K  RAM 

Unidad  de  expansión  de  2 slots 
Unidad  de  expansión  de  5 slots 
Primer  Buffer  PAR/PAR  16K 
Jovstick  “Z1P  ST1K" 


CBM64 

Tarjeta  80  columnas 
Tarjeta  4K  + 8K  EPROM 
Unidad  de  expansión  de  2 slots 
Unidad  de  expansión  de  5 slots 
Printer  Buffer  SER/PAR  32K 


Concursos  de  AJedre: 
en  Badajjoz 


Con  motivo  de  las  fiestas  de  San  Juan  se 
celebró  en  Badajoz,  en  el  Parque  de  Castelar,  un 
concurso  de  ajedrez  para  niños.  Participaron 
más  de  100  niños  de  7 a 14  años,  utilizano  equi- 
pos VIC-20  con  el  programa  Sargon  II.  Veinti- 
séis niños  ganaron  al  ordenador,  69  salieron  per- 
diendo, y 7 lograron  empatar.  La  Emisión  Radio 
80  tuvo  en  el  lugar  una  Unidad  Móvil  que  iba 
retransmitiendo  cómo  se  sucedían  las  jugadas, 
ilustranso  las  anécdotas  que  se  producían  con 
entrevistas  a los  concursantes  y asesores  del 
juego  allí  presente. 


PARA  VIC-20  y CBM64 

Tableta  Gráfica  KOALA-PAD 
SINTETIZA  DOR  DE  VOZ 


PARA  TODO  TIPO  DE  ORDENADORES 

PROGRAMADOR  DE  EPROM  14.995 
BORRADOR  DE  EPROM  8.775 

Pedidos  c información: 

DELTABIT 

Colón,  20-4.“  - SILLA  (VALENCIA) 
Tel.  (96)  120  29  25 
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Las 

Aventuras 


yfat 


OH...  yesss...  HOMM 
/&oOb[  ..  ¡pedo  /A 

SABE  5.  HAN  DE  -S£< 

Muy  PActr/cos  ! 

I8y£.,ey£ 


jM/ pintó' 

? Loko—- 


M os  a cor  dais  os  A<eueuo  K 
QUE  ME  PEDISTK/S  ■■  d ? K 
st,  HOMBRE  ..  S!  ERA  AtAKcA  V 
*£  COMO  SE  POD/AM  OOMU/V/CAA 

emtre  s/  dos  obdeuadores  a 


Voy  -A  {-¿AMA*  A UM 
AMIGO  MIO  ■ • um  toRD 
/iVSíES  AuTenT/eo  ■ El 
<0u£  MAS  SABE  DE  ¿AS 
COMUN!  CACtOAlSS  _ 


/ <g> 

€e*ASB(///3^ 
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SU  JUSl/Fl  CANON  ES  Cl  APA  \ 
•5/  yo  TiNQO  iNFoPMA  C/ON  \ 
EN  UN  OPDENAboP  LO  PASO 
A OTPo  POP  COMUNICACION 

ASI  NO  TENSO  (Uve  VOLVER 
[ A ESCPIBIP  LO 


I 


CAM  CAPAcTkP  , CA DA  BYTE  1 
SON  UN  CONJpmJó  B£  ? B/TS  \ 
UN  81T  es  un  estado  cepo 
O UNO  . CAPA  CA  PAC.  TEN  £5 
UN  CONJUNTÓ  , COMO  DIJE  . A£ 

cepos  y unos.  / 600b ! ~y 

BN  LA  COMUNICACION  SS  EN 

¡PAN  ¿OS  CAPAC7F  P£  6 BIT  A 


A 5 *®WíO 
’caa*  * y<*“J 


A6G66  ...  MY  GO/> ..) 
GoOD¡  6FFSSM  M t 
MI  ESTaTv/llA  DEL  SI6LO 
xvt  hecha  añicos ^ 


se  COMUNICAN  CON 
UNA  L/NEA  JiLEFoNI 
_^A  A y CAPA  SEÑAL 
f<(éuE  SE  EN  U/A 
> EStU/UALE  a UN 
W y UNO ...  SI  NO  »¿y 
-/SEÑAL  ES  UN  CE ÑC 


8|T  BIT  BIT  > As/  se  ^ H¿a/emo 

^ Q \ 'y  ¿A  TAANS  M/^/ONy- 


■*  ¿A  COAfuN/CA  CtON  — -v- — v- — 

ES  UNA  SUCESION  DE  SEÑALE  S 
y DE  NO  SEÑALES  eSUE  l/N 
ORDENADOR  ENV/A  Y OTPO  LEE 
S/T  A 8/T  SE  FORMAN  ¿OS  /fíNSAA. 


fuego  he  disoul 
,gN  RERL/DAD  ERA 
, UNA  ESTATUILLA 
PE&UEÑA ... 

__  i CON7ÍNOEMOS  / , 


V ^ Fue  PE  A 


L»  L'NEA  SuE  UNE  ¿0*  DosJ 
ORDENADORAS  PUEDE  SEP-^y 
¿£  VAHIOS  Ti  POS  . 

'WsTsoÍ^PueDE^TRPNSMi  Ti e 
í EN  UN  SBNTÍOO  SiN  POSIBILIDAD 
/ DE  Out  LO  NASA  EN  EL  OTRO  ~) 
( SE  Ai  NOMINA  S/MPLEX 


/ CUANDO  SE  PUCHE  ENVIAR  ^ 

r INFORMACION  DESDI  UN  PuNTo  A. 

> u orno , pepo  no  a la  < 

> vjsz  , si  no  cuando  acabe 

EL  e*u son  EnTónces  PUEDE 
recibir . se  llama  ^ 


r y Poe  v&No  ¿ 

/i CUANDO  SE  PUEDE  ~w  _ 
EM/VR  Y REClB/R 
INFORMA  CIO  N AL  MISMO  Ti1 
Tiempo  la  l/NEA  se 
LLANA  Gomo  T'Ut.L  DUPLcX. 


(y  vo 

tama  /e  N 


Ti  ENVIO 


EMISOG 


UNA  «EC6  Pibe. 
HULfCOIOH 


EMISOR  . EMISO* 

hecspToH  DiPecaoNts  wcEífcR 

PEPO  NO  A 
LA  VEZ 


EMISOR  fiPsasioNEs 
RE0EPT0R  a LA  uez 


Piones  C**oA 
A LA  VEZ  PCOEFTbft 


CADA  UPO  CONTRATA  SU  ¡~ 
LINEA  SE&UN  LE  COU VENDA 
DE  TopML  PepUANtNTe  o < 
LIBRE  t COMO  UN  TEteFoNOÁ 
SOLO  CE  COBRAN  Cuando  la 
, U 7/ LIZA  2 

-'-l/^-ríÁSI  S£  Hác£ 
su  *£4.  BAJO  LA 
'-7íY\\>  MODAL  I DAD  <s  UE 
CAnTÉS  os  dije 
''■¿Infc VMPLEY  , NALF 
> O FuLL  DUPLEX 


¿ACMATe 


Commodore  World  Sepiiumbte  1984/57 


58/C'ommodore  W orld  Septiembre  1984 


— J m w m programas  MEGSOFT  en  cinta 

II  U S informática  para  Commodore  Vic-20  y C-64 

Avda.  de  Barbera,  291,  bajos 

Tel.  (93)  711  28  61  Sabadell  (Barcelona) 



— CONTABILIDAD  PERSONAL  - V¡c-20.  Este  programa  presenta  la  gran  ventaja  frente  a otros  existentes  en  el  mercado 
de  no  necesitar  ampliación  de  memoria.  Los  movimientos  a realizar  pueden  incluirse  en  14  conceptos  diferentes  con  las 
siguientes  opciones  del  programa:  Entrada  de  los  datos  por  mes,  Visualización  de  los  conceptos  de  cada  mes.  Lectura  y gra- 
bación de  datos,  y Totalización  de  meses. 

Precio:  1 .500,-  pts. 

— CONTABILIDAD  PERSONAL  - C-64.  Este  programa  está  diseñado  para  que  el  propio  usuario  pueda  llevar  un  control 
mensual  o anual  de  todos  sus  ingresos  o gastos,  pudiendo  detallarlos  en  26  conceptos  diferentes  (23  de  gastos  y 3 de  ingre- 
sos) que  recogen  la  práctica  totalidad  de  una  economía  doméstica.  Se  presentan  dos  opciones:  Registro  y Actualización  de 

ingresos  y gastos,  y Contabilidad  y Análisis  Financiero. 

En  la  primera  opción  se  introducen  los  movimientos  (apuntes)  dónde  cada  movimiento  posee  los  siguientes  conceptos: 

Día  de  realización  del  movimiento,  código  (ropa,  hipoteca,  etc.),  cantidad,  forma  de  pago  (metálico,  tarjeta  de  crédito, 
etc  ) y descripción.  En  todos  los  casos  se  pueden  agregar  más  movimientos,  corregirlos,  eliminarlos  o comprobarlos.  El  pro- 
grama permite  la  entrada  acumulativa  de  movimientos  de  forma  que  no  es  necesario  entrar  todos  los  movimientos  de  un 

mes-  I-  XI • • « 

En  la  segunda  opción  se  pueden  totalizar  todos  los  meses  introducidos,  por  conceptos,  o realizar  un  análisis  comparativo 
de  cada  mes  mediante  los  valores  numéricos  o un  gráfico  multicolor,  en  él  aparecen  los  26  conceptos  diferentes. 

Precio:  6.000  - pts. 

— AGENDA  - C-64.  Dicho  programa  permite  crear  ficheros  en  cassette  con  los  siguientes  datos:  Nombre.  Apellidos,  Di- 
rección, Población,  Provincia,  Distrito  Postal,  Teléfono  y un  comentario  anexo. 

Las  opciones  del  programa  son  las  siguientes:  Altas,  bajas,  consultas,  modificaciones,  leer  y grabar  fichero.  El  programa 
permite  además  una  ordenación  alfabética  de  todo  el  fichero. 

El  tamaño  máximo  del  fichero  es  de  200  datos  completos.  Sin  embargo,  pueden  crearse  ficheros  en  diferentes  cintas  de 
cassette  (por  ejemplo,  clientes  por  zonas),  por  lo  que,  realmente,  no  hay  límites  de  capacidad. 

Precio:  3.000,-  pts. 

— ETIQUETAS  C-64.  Este  programa  permite  la  creación  de  un  fichero  en  cassette  para  la  realización  de  etiquetas.  Puesto 
que  hay  en  el  mercado  diferentes  tipos  de  etiquetas,  el  programa  consulta  al  usuario  el  tipo  de  etiquetas  a utilizar,  si  hay 
una  dos  o tres  etiquetas  en  línea,  distancia  entre  las  mismas,  asi  como  los  saltos  de  línea  entre  etiquetas. 

Las  opciones  del  programa  son  las  siguientes:  Altas,  Bajas,  Consultas,  Listados  y Modificaciones,  permitiendo  además 
ordenar  alfabéticamente  todo  el  fichero. 

El  número  máximo  de  etiquetas  a realizar  es  de  300  por  fichero,  sin  embargo,  con  el  mismo  programa  pueden  crearse 
ficheros  en  diferentes  cassettes,  siendo,  en  éste  caso,  ilimitado  el  número  de  etiquetas  a realizar. 

Precio:  3.000,-  pts. 


BIBLOS  64.  Control  de  la  Biblioteca  particular. 

FILOS  64.  Ideado  para  Filatélicos  y Coleccionistas  de  sellos. 
NUMISMAT  64.  Para  Numismáticos  y Coleccionistas  de  monedas. 
MENU  64.  Control  alimenticio  mediante  un  fichero  de  Menús. 
STOCK  64.  Control  de  los  artículos  y valoración  de  los  mismos. 


Precio:  3.000,—  pts. 
Precio:  3.000,—  pts. 
Precio:  3.000 .-  pts. 
Precio:  3.000,—  pts. 
Precio:  3.000,—  pts. 


0trComecocos,aWh ^age^/^terofíes  I , I nvader  Fall.Ski-Vic.  Faxdowsa.  Nerdrungri,  Snake  Pit.Space  War,  Wall  gate,  Bombardeo. 

Otros  programas  para  el  C - 64:  . , . . 

Ajedréz,  Biorritmos,  Backgamon,  Damas,  Othello,  Black  jack.  Monopoly,  Huida,  Frogger.  Multihead,  Jawbreaker. 


En  preparación  C-64: 

Camellos  Mutantes,  Motor  Mania,  Parchís.  Hombre  Rico-Hombre  Pobre,  etc. 

P,°ConTro|Cde4Guarderías,  Realización  de  Quinielas.  Talleres  de  Reparación,  Clubs  de  Video,  Contabilidad  dos  V cuatro 
niveles.  Caja  y Bancos,  Cartera  de  cobros  y pagos.  Facturación.  Proveedores  y Clientes.  Control  de  Albaranes,  Stocks, 
altas  y bajas  consultas  y modificaciones.  Listados.  Valoración  del  stock.  Listas  de  precios,  etc. 


BUSCAMOS  PUNTOS  DE  VENTA  EN  TODA  ESPAÑA 


Servicio  gratuito  para  nuestros  lectores  particulares.  Empresas  300  ptas.,  por  línea. 

De  no  especificar  duración,  los  anuncios  serán  publicados  durante  1 mes. 


MERCADILLO 


• Vendo  un  ordenador  Commodorc  4000 
y otro  3.000.  Buen  estado.  Con  programas. 
Teléfono:  402  38  89  / 40 1 2 1 05  (Ref.  M-  70). 

• Vendo  adaptador  de  alta  resolución 
gráfica  para  video  genic  sistems.  Convierte 
la  pantalla  en  384X192  puntos,  añade  10 
comandos  Basic  para  gráficos  alta  resolu- 
ción. vectores,  punto  a punto,  superficies, 
relleno  o vaciado  de  superficies,  etc.  Fácil 
instalación  al  ordenador  a través  del  conec- 
tor  trasero.  Incluye  instrucciones  de  mon- 
taje y uso  con  programas  de  ejemplo.  Con- 
vierte al  genic  EG-3I00  en  un  nuevo 
ordenador.  Precio  25.000  ptas.  Interesados 
llamar  al  Teléf.  (93)  762  44  21  en  horas  de 
comida  o cena.  Forran  Vallespi.  Apartado 
119.  Pineda  de  Mar.  Barcelona.  (Ref. 
M-71). 

• Vendo  VIC-20  ( 29.000  ptas.)  Superex- 
pander  (6.000  ptas.)  Cartucho  de  ayuda  al 
programador  (5.000  ptas)  y placa  expan- 
sora  4 cartuchos  (7.000  ptas.)  por  la  com- 
pra en  conjunto  regalo  “guia  de  referencia” 
(2.500  ptas)  y “VIC-20  guía  del  usuario" 
(2.300).  José  Antonio  Serrano  Bcrgali. 
C/Avda.  de  Kansas  Citv,  32.  Teléf.  (954) 
57  33  08  41007  Sevilla.  (Ref.  M-72). 


¿Quiere  ahorrar 
95.000  ptas.? 


No  necesita  comprar  una  unidad  de  discos. 
Nuestro  cariucho  l AST-IT  RBO-MENU, 
transformará  su  Dalasctte  en  un  lector  de 
programas  un  10%  más  rápido  que  la  uni- 
dad de  discos. 

I.n  una  cinta  de  C-60  puede  tener  hasta  10 
programas,  con  lo  que  también  se  ahorra,  al 
usar  menos  cintas. 


1. UIOPl.IFTER 

2.  MONOPOL V 

3.  SUPERBASU 

4.  BUSICALC 

5  

6  


Sólo  tiene  que  pulsar 
el  n'1  del  programa  que 
quiere  leer  y el 
Dalassetle  lo  localizará 
y leerá  con  gran  rapidez 


8.500  ptas. 
ASTOC-DATA 

Hardware  > Softwarc-Systems 
Sarda  de  Abajo 
Santiago  de  C'omposteia 
Id.  «81  - 599  5.1.1 
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• Vendo  por  32.000  ptas.  ZX  Spectrum 
16K,  a estrenar,  obtenido  en  junio  en  un 
concurso.  Francisco  Sáez.  C/Virgen  del 
Rosario,  nu  28.  Alcantarilla  (Murcia). 
Tfno.:  (968)  80  23  64.  (Ref.  M-73) 

• Vendo  Cassettes  de  juegos  para  Com- 
modorc 64  por  cambio  de  modelo.  Los  jue- 
gos son:  'Camelos  mulantes,  frogger,  gri- 
drunner  y comecocos  a 1.000  pesetas  cada 
uno  y superbasic  (añade  35  instrucciones)  a 
2.000  pesetas.  Mis  señas  son:  Bernardo  Ber- 
rrocal.  C/Juan  XXIII  nc  24.,  bajos.  San 
Cugat  del  Vallés  (Barcelona).  (Ref.  M-74). 

• Vendo  VIC-20  (Comprado  en  1983)  con 
ampliación  de  I6K,  cartucho  de  ajedrez,  I' 
y T parte  del  curso  de  basic,  un  libro  con 
treinta  programas,  cartucho  de  juegos,  cua- 
tro cintas  de  juegos  compradas  y una  cinta 
con  un  montón  de  juegos  y programas. 
Todo  sólo  por  37.000  ptas. 

José  Arturo  Guillén  Valen.  Marina  Espa- 
ñola, Edificio  Azabache,  14-C.  Zaragoza-6. 
(Ref.  M-75). 

• I engo  un  Commodorc  64  y deseo  inter- 
cambiar programas  y juegos.  Interesados 
dirigirse  a Oriol  Fructuoso  Rccoscns 
C/Sant  Eduard  15,  2U  Io  Sant  Cugat  del 
Valles.  Barcelona.  Teléfono:  (93)  674  51  62. 
También  tendría  interés  en  contactar  con 
un  club  de  usuarios  próximo.  (Ref.  M-76) 

• Intercambio  programas  para  el  C-64  y 
VIC-20.  Tengo  más  de  40  programas  dife- 
rentes. Si  me  escribes  te  mandaré  un  pro- 
grama regalo.  Ignacio  Pascual  Marugan 
C/Urgel  288  8-E  08036  Barcelona.  (Ref. 
Vf-77). 

• Vendo  VIC-20  (Encro-83),  Cassette  C2N, 
y con  ellos  cartucho  Ajedrez,  diversos  pro- 
gramas en  cassette,  curso  introducción  al 
Basic  (Parte  1),  Guía  de  referencia  al  pro- 
gramador, Colección  Club  Commodorc  y 
Commodorc  World  incluido  este  año. 
Todo  ello  por  45.000  ptas.  Llamar  al  (93) 
335  59  13  y preguntar  por  Antonio,  de  13  a 
15  h.  o a partir  de  22  h.  Antonio  Luque 
Luz.C/Francia,  56,  109-2*,  Hospitalet  (Bar- 
celona). (Ref.  M-78). 

• Vendo  ZX-81  sin  estrenar  (lo  conseguí 
en  un  concurso)  y una  cinta  con  diversos 
programas  por  10.000  ptas.  Francisco  Saez 
Soto.  C/Virgen  del  Rosario,  28  Alcantarilla 
(Murcia).  Teléf.:  (968)  80  23  64  (Ref.  M- 79). 

• Lamento  tener  que  vender  unos  vídeo- 
juegos  Binatone  (color)  con  4 cartuchos  de 
juegos  (comprado  todo  en  el  82)  o cambiar- 
los por  impresora  para  VIC-20  abonando 
diferencia  a convenir.  Llamar  horas  comida 
o de  21  a 24  h.  al  (93)  753  1 1 36.  Preguntar 
por  Sergio  (Ref.  \l-80). 

• Poseo  cariucho  monitor  lenguaje  máqui- 
na, y me  gustaría  cambiarlo  por  otro,  a ser 


posible  de  ampliación  Rain  (mínimo  8K). 
Abonaría  diferencia  con  programas  de  jue- 
gos (cinta  comercial).  También  admitiría 
cartucho  de  juegos.  Ah!  para  VIC-20.  José 
Campos  Mtnez.  Avda.  26  de  julio  nu  39. 
Iuy  (Pontevedra)  (Ref.  M-81). 

• Vendo  lote  de  6 cassettes  nuevas  com- 
pradas en  EE.UU.  para  VIC-20.  Precio 
2.000  ptas.  Vendo  curso  de  Introducción  al 
lenguaje  Basic  Parte  I para  VIC-20  (libro  y 
dos  cassettes)  Precio:  1.750  ptas.  Vendo 
juego  “TROS"  para  C-64  cassette  nueva. 
Precio  1.600  pesetas.  Javier.  Teléfono  (91) 
244  42  87.  Llamar  tiñes  de  semana  (Ref. 
M-82). 

• Intercambio  información  y programas 
de  todo  tipo,  en  disco  o cassette,  para 
Commodorc  64.  Interesados  dirigirse  a: 
Antonio  Fernández  Anglada,  C/Moralzar- 
zal,  94  (bajo  c).  Teléfono  734  27.  34. 
Madrid-34.  (Ref.  M-83). 

• Compro  impresora,  enviar  marca,  modelo  1 
lecha  de  compra  y precio  a:  José  Manuel. 
Apartado  2144.  1.a  Coruña  (Ref.  M-84). 


• Cambio  cassettes  por  razones  indus- 
triales, entrego  el  modelo  nuevo  con 
total  garantía  a cambio  del  antiguo,  o 
compro  el  antiguo.  Teléf.  (93)  230  48  05 
(Ref.  M-85). 


CLUBS 


• Club  de  amigos  del  VIC-20  y Commo- 
dore  64.  Ramón  O.  Serna  Soler.  Foto  Estu- 
dio 2.  Plaza  de  Sombrereros,  2.  PALMA 
DE  MALLORCA,  leí.:  21  31  62.  (Ref 
C-l). 

• Desea  información  sobre  clubs  en  exis- 
tencia y gente  que  quiera  formar  uno. 
Agustín  Quevcdo  Vclasco.  C/  Oña,  55-411 
B.  MADRID-34  Tel.:  202  94  28.  (Ref  C-2). 

• Desea  información  sobre  clubs  en  exis- 
tencia y gente  que  quiera  formar  uno. 
Pablo  Ñistal  Alonso.  C/  Empecinado,  46, 
6-  B.  MOSTOLES.  leí.:  645  21  70.  (Ref. 
C-3). 

• Club  de  programación  Alaiz,  en  Pam- 
plona. Está  dirigido  a estudiantes  de  B.U.P. 
v C.O.U.  No  tiene,  ningún  fin  lucrativo. 
Equipos  COMMODORF  64.  VIC-20  y 
diversos  periféricos.  Pza.  Monasterio  Santa 
Gemina,  s/n.  Tels.:  254  480-257  704.  PAM- 
PLONA. (Ref.  C-4). 

• Club  de  Commodorc  de  Albacete.  Fcr- 


nando  Martínez  Guerrero.  La  Roda.  39.  59 
D.  ALBACETE.  (Re).  C-5). 

• Círculo  de  Durensan  Vigués.  VICO.  C/ 
Venezuela,  48.  Entrechan.  Tels.:  (986)  410 
683/422  519..  (Ref  C-6). 

• Un  grupo  de  usuarios  de  la  Comunidad 
Autónoma  de  Murcia  intenta  crear  un  Club  ■ 
de  Usuarios  de  V1C-20  y C-64  en  esta 
región,  sin  fines  lucrativos.  Interesados 
llamar  a los  teléfonos  (968)  80  23  64 
(Mañanas,  preguntar  por  Paco);  (968)  26  72 
62.  (Tardes,  preguntar  por  Fernando). 
Francisco  Sáez  Soto.  C/  Virgen  del  Rosa- 
rio, 28.  ALCANTARILLA.  Murcia.  ( Ref 
C-7). 

• Deseo  contactar  con  interesados  en  for- 
mar un  club  de  microordenadores  en  Barce- 
lona e intercambiar  experiencia.  Domenec 
Garrofe.  C/  Aragón,  575,  4e  2a.  BARCE- 
LONA-26.  Tel.:  348  00  39.  (Ref  C-8). 

• Interesados  en  la  creación  de  Club  de 
Usuarios  en  Girona  escribir  a "Apartado 
de  Correos  n«  580"  de  GIRONA.  (Ref 
C-9). 

• Xabicr  Prat  i Burdo  que  vive  en  c/  Rabal 
Sta.  Eulalia  s/n.  de  Sta.  María  Dolo 
(BAGES)  Barcelona,  quisiera  saber  si  existe 
algún  Club  Commodorc  cerca  de  Manrcsa 
y solida  información  sobre  todo  lo  relacio- 
nado con  Módems.  (Ref  C-10). 

• Os  rogaría  me  comunicarais  si  existe 
algún  Club  Commodore  en  nu  ciudad 
(GUADALAJARA)  o en  ALCALA  DE 
HENARES  (donde  trabajo).  Miguel  Angel 
Capeña  Alonso.  C/  Tabernero,  16-31’  I. 
Tel.:  (91)  22  67  57.  (Ref  C-II) 

• Desearía  información  sobre  la  existencia 
de  algún  Club  Commodore  en  Somaén  o 
sus  cercanías.  Carlos  Cabrera.  Camino  de 
las  Eras.  s/n.  SOMAEN  (Soria).  (Ref 
C-12). 

• Asociación  Manchega  de  Usuarios  de 
CBM-64  (A.M.U.C.-64).  C/  Blasco  de 
Garay,  10.  ALBACETE.  Esta  asociación 
persigue  extender  el  uso  racional  de  la 
informática,  concretándose  de  momento  en 
el  ordenador  Commodorc  CBM-64.  (Ref. 
(-■13). 

• Club  MICRO-ESPLAI.  Estamos  en 
Gran  Via,  682,  Pral,  (Entre  Bruch  y 
Gerona)  de  BARCELONA.  Todos  los  ami- 
gos que  tengáis  más  de  15  años  y menos  de 
10(1  podéis  participar  en  esta  experiencia.  Y 
si  sois  inás  jóvenes,  venid  también,  ya  nos 
las  ingeniaremos  para  organizar  activida- 
des interesantes. 

Para  informaros,  los  viernes  de  6 a 8 
larde  o los  sábados  de  9 a II  de  la  mañana. 
(Ref  C-14). 

• Queremos  formar  un  Club  Commodorc 
en  Barcelona.  José.  Tel.:  329  86  31.  C/ 
Aurora,  19-4"  1.a  BARCELONA.  (Ref. 
C-15). 

• Me  dirijo  a ustedes  por  un  hecho 
reciente,  que  es  la  disolución  del  único  club 
de  usuarios  en  Barcelona  con  sede  en 
ELEKTROCOMPUTER.  Quiero  decirles 
que  su  revista  es  un  medio  para  crear  un 
nuevo  Club,  por  eso  pido  que  si  ustedes  lo 
creen  conveniente,  publiquen  esta  carta. 
Eduardo  Macip  Pite.  C/  Piorno  de  la  Villa, 
ii°  4.  MONTBLANC.  Tarragona.  (Ref.  C-1 6) 

• Quisiera  saber  si  existe  algún  club  com- 
inoaorc  en  Sevilla.  Francisco  Javier  Recio 


Lamata.  C/  Fernán  Caballero,  22.  SEV1- 
LLA-1.  (Ref.  C-I7). 

• Agradecería  mucho  a todo  el  que 
pudiera  informarme  sobre  la  creación  ael 
club  commodore  en  Girona.  Daniel  Bassas. 
GERONA  capital.  Plaza.  Marques  de 
Camps.  16.  3ff,  2.a.  Tel.:  21  27  26.  (Ref. 
C-I8). 

• Club  Ensenada  de  Santander:  Commo- 
dore 64  y VIC-20  y diversos  periféricos.  Su 
actividad  se  centra  en  el  intercambio  de 
programas  y experiencias,  perfeccionamiento 
de  lenguajes,  uso  del  logo,  etc.  Club  Ense- 
nada. C/  Sta.  Lucía.  I.  Io.  Tel.:  22  59  92. 
(Ref.  C-19). 

• Estoy  formando  un  club  de  intercambio 
de  programas  (en  cinta)  para  VIC-20. 
Jaime  Vidal  Forteza.  C/  Sor  Damiana,  16- 
l9.  S.  Francisco  (Pil.  lari).  PALMA  DE 
MALLORCA.  (Ref  C-20). 

• Me  interesaría  conocer  si  hay  algún  club 
de  amigos  del  VIC-20  cerca  dé  mi  ciudad. 
Agustín  Ruiz  Castrillo.  C/  Gregorio  Sola- 
barrieta,  49.  4"  izda.  MIRANDA  DE  EBRO 
(Burgos).  (Ref  C-21). 

• Estamos  formando  un  Club  de  Usuarios 
en  el  centro  de  Madrid.  Cualquier  intere- 
sado que  se  ponga  en  contacto  con  nos- 
otros en  el  apartado  427  de  Madrid,  diri- 
giéndose a Rafael  (EB4XD).  Teléf.  276  66  94 
(Dejar  teléfono.  Contestador).  (Ref  C-22) 

• Me  gustaría  entrar  en  contacto  con  usu- 
sarios  del  CBM-64,  para  intercambio  de 
programas  c ideas,  asi  como  para  trabajar 
en  grupo”. 

Interesados  ponerse  en  contacto  con: 
Antonio  Iglesias  Arias.  C/San  Isidro 
Labrador,  16,  1“  B.  Palma  de  Mallorca,  5. 
Baleares.  Teléf.:  412  728.  (Ref.  C-23). 


• Quisiera  que  apareciera  este  aviso: 
Deseo  entrar  en  contacto  con  otros  posee- 
dores del  Commodore  64  para  intercambio 
de  programas  y técnicas.  Angel  Jiménez 
Romero,  C/Ramírez  Arellano,  6,  Córdoba 
2.  Teléf.:  479  750  (Ref  C-24). 

• Interesados  en  la  formación  de  un  club 
de  usuarios  de  los  ordenadores  “VIC-20  y 
Commodore  64"  en  la. "REGIO  7".  Eñ 
dicho  club  se  tendrán  numerosas  ventajas 
en  la  adquisición  de  juegos  programas  y 
accesorios.  Escribir  o llamar  a:  Félix  Por- 
tabella Padro.  C/Forn  de  Santa  Llucía  nv 
1,  2a  MANRESA.  Teléf.:  872  22  97.  (Ref 
C-25 ). 

• Estudiante  Informática  desearía  inter- 
cambiar todo  tipo  de  Software  (Commo- 
dore 64).  Amplio  catálogo  disponible.  Inte- 
resados escribir  enviando  lista  con  sus 
programas  a:  José  Francisco  Aldana  Mon- 
tes. La  Paz,  2-3  6°  D.  Málaga,  4 o llamar  al 
teléfono  317  696.  (Ref.  C-26). 

• Me  gustaría  ponerme  en  contacto  con 
usuarios  del  C-64  en  Zaragoza  para  inter- 
cambio de  programas.  Mis  señas  son:  Cle- 
mente Pérez  Rgucz.  Avda.  de  Goya,  2,  1° 
A.  Zaragoza-6.  Tfno.:  21  90  46.  (Ref  C-27). 

BOLSA  ] 
DE  TRABAJO  / 


• Se  necesita  vendedor  de  publicidad 
dinámico  con  experiencia  (Residente  en 
Madrid).  Contactar  con:  COMMODORE 
WORLD.  C/Barquillo,  21-3°  Izda.  28004 
Madrid.  Teléf.  231  23  85/86 


TENEMOS  LO  QUE  BUSCAS 


PARA  TU  COMERCIO 

1 COMMODORE-64 
1 UNIDAD  DISCO 
1 IMPRESORA 
1 TELEVISOR 
1 PROC.  CONTAB. 
GENERAL 
1 BASE  DE  DATOS 

TODO  POR  349.950.- 
0 18.500  PTS.  MES 


Y CUALQUIER  OTRA  SOLUCION  PARA  TI 
CON  IDENTICAS  FACILIDADES  DE  PACO: 

ADEMAS: 

CURSOS  DE  INICIACION,  ASESORAMIENTO  INFORMATICO 
CLUB  DEL  ORDENADOR 


CDÍTIPLITER 

CEflTER 

RBLA.  CATALUNYA.  50,  1°  2 ’ APART.  CORREOS  5455 
08007  BARCELONA  TELF.  (93)  215  60  70 


PARA  TUS  HIJOS 

1 VIC-20 
1 LECTORA 

1 MANUAL 

2 JUEGOS 

1 JUEGO  AJEDREZ 
1 CARTUCHO  JUEGOS 


TODO  POR  61.890,- 
Ó 5.900  PTS.  MES 
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Video 

Casino 

Este  juego,  que  hace  uso 
de  los  números  aleatorios,  te  puede 
hacer  perder  los  nervios. 

Se  puede  jugar  con  el  VIC-20  ó el  C-64 


Este  mes,  con  un  juego  que  es  el 
contrario  de  como  se  juega  a los 
ciados  (es  decir,  tienes  que  evitar 
sacar  tu  número),  vamos  a descubrir 
cómo  el  VIC-20  y el  C-64  eligen  números 
aleatorios. 

En  el  juego  "Nervios",  tú  y tu  contrin- 
cante intentáis  acumular  500  puntos. 
Cuando  toca  tu  turno,  tiras  un  dado,  y 
continúas  tirando  todas  las  veces  que  te 
atrevas.  El  número  de  cada  tiro  se  suma  al 
bote.  Sin  embargo,  si  vuelves  a sacar  la 
misma  cantidad  que  en  tu  primera  tirada, 
se  resta  de  tu  puntuación  la  cantidad  de 
puntos  de  bote. 

Puedes  seguir  tirando,  o plantarte  en 
cualquier  momento  y llevarte  el  bote.  Si  te 
plantas  demasiado  pronto  (porque  te 
falta  nervio)  el  bote  que  te  llevarás  no  será 
de  mucha  cantidad. 

Puede  llegar  un  momento  en  que  te 
pones  muy  nervioso.  Tú  tienes  400  pun- 
tos, y tu  contricante,  480.  Hay  90  puntos 
en  el  bote.  Es  mejor  tirar,  con  la  posibili- 
dad de  llevarte  los  puntos  necesarios  para 
pasar  de  los  500  y ganar.  ¿O  es  mejor  lle- 
varte los  90  puntos  y esperar  que  tu  con- 
trincante no  se  lleve  20  puntos  en  el 
siguiente  turno?  Si  te  sale  mal  el  tiro,  sig- 
nifica que  te  restan  90  puntos,  y te  quedas 
con  310,  y la  seguridad  de  perder.  ¿Vas 
cogiendo  idea? 

"Nervios”  es  un  juego  fácil  de  apren- 


VIC-20  ó C-64 


der,  ya  que  las  posibilidades  de  ganar  son 
muy  parecidas  a las  del  juego  de  dados.  Si 
sacas  un  12  ó un  2 la  primera  vez  que  tiras 
tienes  más  posibilidades  de  llevarte  el 
premio  gordo.  Podrías  acumular  100  ó 
200  puntos  (incluso  más)  antes  de  que 
vuelva  a salir  tu  primer  número.  A 


primera  tirada  se  almacena  en  la  variable 
FR,  y cada  vez  que  una  tirada  posterior 
sale  igual  que  FR,  el  programa  se  bifurca 
a la  rutina  "tú  pierdes”,  y resta  la  canti- 
dad del  bote,  TT,  de  tu  dinero.  Estos 
valores  de  dinero  se  almacenan  en  un 
“array"  de  dos  elementos,  Cash(l)  y 


J6  LOUPPS* 


medida  que  los  puntos  se  vayan  acer- 
cando a los  números  medianos,  se  acon- 
seja más  precaución.  Este  juego  es  espe- 
cialmente divertido,  ya  que  un  12  podría 
salir  tres  veces  seguidas.  Podría  ocurrir, 
juegas  tú  contra  las  posibilidades. 

La  operación  del  programa  es  sencilla. 
Se  tiene  acceso  a una  rutina  de  “tirada  de 
dados”  cada  vez  que  sea  necesario.  La 


Cash(2),  cuando  el  subíndice  queda 
determinado  según  sea  la  variable  Player 
(1  ó 2). 

TT  se  incrementa  por  la  cantidad  de 
cada  tirada,  hasta  que  te  quedes  con  el 
bote,  o hasta  que  vuelve  a salir  tu  número 
original,  y TT  se  resta  de  tu  total.  Cuando 
se  finaliza  un  turno,  el  programa  verifica 
las  líneas  580-600  para  ver  si  el  jugador  es 
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el  1 ó el  2,  y fija  su  valor  en  el  contrario. 
Después  de  cada  tirada,  se  realiza  una 
verificación,  para  ver  si  tú  o tu  contrin- 
cante tiene  más  de  500  puntos.  Si  es  asi,  el 
programa  bifurca  a una  rutina  que  anun- 
cia el  ganador. 

Tiradas  Aleatorias 

Este  programa  introduce  el  concepto 
de  RND,  la  selección  de  un  número  alea- 
torio por  el  ordenador.  Cuando  el  VIC-20 
y el  C-64  encuentran  la  sentencia  RND 
(1),  elegirán  un  número  mayor  que  cero, 
pero  menor  que  uno.  Este  podría  ser, 
.562391.  .29171,  o alguna  otra  fracción 
decimal. 

Sin  embargo,  como  esto  es  un  juego  de 
dados,  necesitamos  números  enteros  de  1- 
6.  Para  producir  estos  números,  se  multi- 
plica por  el  mayor  número  entero  que  se 
necesita  y se  le  suma  uno.  Por  ejemplo, 
RND(I)*6  producirá  números  reales 
mayores  que  cero  pero  menores  que  seis. 


Si  a cualquiera  de  estos  números  se  le 
añade  uno,  se  consiguen  los  números 
aleatorios  entre  1+  y 6+.  La  porción  de 
enteros  del  número  proporciona  los 
números  enteros  de  1-6. 

¿Son  los  números  realmente  aleatorios? 
A decir  la  verdad  no,  ya  que  el  ordenador 
utiliza  una  fórmula  fija  (algoritmos)  para 
llegar  a una  serie  de  números  llamados 
seudo-aleatorios.  Esta  serie  es  muy  larga, 
y el  ordenador  generalmente  empieza  en 
un  punto  muy  distinto  en  la  secuencia 
cada  vez,  de  forma  que  los  números  se 
repiten  pocas  veces. 

Los  programadores  avanzados  querrán 
saber  que  el  número  trabajado  por  la  sen- 
tencia RND  (el  argumento)  afecta  el 
punto  inicial  de  la  secuencia.  Esto  se 
llama  la  “semilla”.  RND(O)  generará  un 
número  aleatorio  que  se  relaciona  con  el 
reloj  incorporado  del  VIC-20  y el  C-64.  El 
reloj  empieza  a contar,  a intervalos  de 
1/60  de  segundo,  a partir  del  momento  en 
que  se  enciende  el  ordenador. 


Si  el  argumento  es  menor  que  cero 
(RND(-l),  por  ejemplo),  la  secuencia  de 
números  aleatorios  se  vuelve  a "sembrar” 
automáticamente.  Los  argumentos  mayo- 
res que  cero,  como  RND(l),  producirán 
la  misma  secuencia  de  números  aleatorios 
para  una  determinada  “semilla"  de 
número  aleatorio. 

Realmente  las  diferencias  afectan  poco 
los  programas  cortos  como  este.  Teclea  el 
siguiente  programa  corto  para  ver  lo  que 
pasa. 

10  INPUT  "ENTRA  ARGUMENTO:";X 
20  R=RND(X) 

30  PRINT  R; 

40  GET  AS:  IF  A$=”  "GOTO  40 
50  GOTO  20 

Ejecútalo  varias  veces,  introduciendo 
valores  distintos  para  X,  y observa  las 
secuencias.  Pulsa  cualquier  tecla  para  ver 
el  siguiente  número  aleatorio.  Entre  cada 
ejecución,  pulsa  la  tecla  Run/Stop  la  tecla 
Restore  para  asegurar  que  el  ordenador 
esté  totalmente  recuperado.  ■ 


VIC-20 

10  REM  NERVIOS 
20  REM 

30  REM 
40  REM 
50  REM 

60  PR I NT " ! CLR  3 ! 2CRSRD 3 " 

70  PR I NT " ENTRB [ SPC 3 NOMBRE ! SPC ] JUGADO 
RCSPC] 1 " 

80  INPUT  PLAYER*<1> 

90  PR I NT " ENTRAC SPC ] NOMBRE! SPC ] JUGADO 
RCSPC 32" 

100  INPUT  PLAVER* (2) 

110  PR I NT " C CLR  3 C 2CRSRD  3 " 

120  PR I NTTAB < 7 > " C RVS0N 3 C RED  3 NERV I OS 
C RVS0FF 3 C BLU  3 C 2CRSRD  3 " 

1 30  PR  I NTTAB < 1 ) " I NTENTA C SPC 3 LLEGAR C SPC 3 
A C SPC 3 500" 

140  PR I NTTAB < 2 ) " PUNTOS C SPC 3 ANTES C SPC 3 
QIJE" 

150  PR I NTT AB < 2 > " TU C SPC 3 CONTRINCANTE. 

11 

1 60  PR I NT " PUEDES C SPC  3 T I PAR  C SPC  3 LOS C SPC  3 
DADOS  C 2SPC  3 HASTA  C SPC  3 QUE  C SPC  3 " i 
1 70  PR  I NTT  AB  < 2 > " VUELVAS  C SPC:  3 A C 4SPC  3 S 
ACAR  C SPC  3 TU C SPC 3 PR I MERA  C 4SPC  3PUNTUAC 
I OH  C SPC  3 V C SPC 3 P I ERDAS . " 

180  PR I NTT AB < 2 > " 0 C SPC 3 TE  C SPC  3 PLANTAS 
C SPC  3 V C SPC 3 TE  C 6SPC 3 LLEVAS C SPC 3 EL  C SPC  3 
BOTE ! " 

190  PRINT"! CASPIO" 

200  PR I NT " C RVSON 3 C GRN 3 C SPC 3 PULSA C SPC  3 
CIJALRU I ER  C SPC  3 TECLA  C BLU  3 " 

210  GET  Aí  IF  Aí=" " GOTO  210 

220  -PLAVER=  1 

230  0P=2 

240  CASH ( 1 ) =200 

250  CASH  < 2 ) =200 

260  GOTO  290 

270  RQL.L=  I NT  < RND < 1 > #6 ) + 1 NT  < RND í 1 > *6 ) 

+2 

280  RETURN 

290  PR I NT" C CLR 3 C 2CRSRD3 " 


300  PR I NTT AB C 2 > " C RVSON 3 C GRN 3 " , PLAVER 
t < PLAVER ) ; " C BLU  3 C RVS0FF 3 C SPC 3 LLEVAS ■ 
CCRSRD3" 

310  GOSUB  270 

320  FR=R0LL 

330  GOSUB  270 

340  IF  FR=R0LL  GOTO  330 

350  GOTO  400 

360  PR I NT " C CLR 3 C 2CRSPD 3 " 

370  GOSUB  270 

380  PRI NTTAB' 2> " C RVSON 3 T GRN 3" • PLAVER 
t < PLAVE  R J i " C BLU  3 C RVSOFF 3 C SPC 3 LLEVAS : 
CCRSRD3 " 

390  IF  FR=R0LL  GOTO  620 

400  IF  CASH':  1 >>500  0R  CASH < 2) >500  G0 

TO  720 

4 1 0 PR I NTTAB < 2 > " PR I MERA C SPC  3 T I RADA : " 

;FP 

420  PRINT" CCRSRDJ " 

430  PR I NTTAB < 2 > "ULT I MA C 2SPC 3 T I RADA  " 

;roll 

440  PRINT" CCRSRD3 " 

450  TT=TT+R0LL 

460  PRI NTTAB < 2 > " TU C SPC 3 TOTAL C SPC 3 ES C SPC I 
DE  " ; CASH (PLAVER) i 
470  PRINT" CCRSPIO " 

480  PR I NTT AB < 2 ) " EN C SPC 3 EL  C SPC 3 BOTE C SPC  3 
HAV : " ¡ TT 

490  PR I NT " C CRSRD  3 " 

500  PRINT" PUNTOS! SPC 3 CONTRARIO  • " ..  CAS 
H < 0P  > 

510  PRINT"! CRSRD 3" 

520  PRINT"! RVSON 3 í RED  3 T I RAS I SPC  3 OTRA 
I SPC 3 VEZ I SPC 3 < S/N > ? ! SPC 3 C BLU  3 " . 

530  GET  AN$: IF  AN*®"“  GOTO  530 

540  IF  AN$="N"  THEN  CASH < PLAVER )=C AS 

H<PLAVER)+TT :G0T0  570 

550  IF  AN$="S"  THEN  FOR  N=1  TO  100  N 

EXT  N GOTO  360 

560  GATO  ^30 

570  TT=0 

580  IF  PLAVER® 1 THENPLAVEF-2 : 0P= 1 GO 
T0  290 
590  0P=2 
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•*600  PLRVER=1 
610  GOTO  290 
620  PR  I NT  " C CLR 3 [ 2CRSRD  3 " 

630  PR I NTTAB <2  > " TU  C SPC 3 P I ERKES 1 " 

640  PR I NT  TAB < 2 > " TU [ SPC 3 T I ENES " , 

650  CASH ( PLRVER > =CRSH < PLRVER > -TT 
660  PRINT  CRSHÍ PLRVER) 

670  PR I NT " [ CRSRD 3 C RVSON 3 [ CRN  3 PULSA t SPC 3 
CURLQU I ER  C SPC 3 TECLA C SPC 3 C BLU 3 " 

680  GET  Ai  : IF  Ai=" " GOTO  680 

690  TT=0 

700  PRINT" [CLR 3" 

710  GOTO  570 

720  PR I NT " [ CLR  3 [ 2CRSRB  3 " 

730  IF  Cfl < 1 ) >CR < 2 ' THEN  PRINTTRB<2>PL 
i < 1 ) " [ SPC  3 GANA  ! 1 " PR  I NTTAB C 2 > " l SPC  1 
CON" .CA(1>; "i"  GOTO  760 
740  PR I NTTAB ( 2 > PLi ( 2 > . "C SPC 3 GANA! 1 " 

750  PR I NT " [ SPC 3 CON " • CASH • 2 > . "i" 

760  PRINT" C2CRSRD3 " 

770  PR I NT  TAB  < 4 > " [ RVSON 3 [ GPU  3 JUEGAS L SPC 3 
OTRA [ SPC  3 VEZ? [ BLU 3 " 

780  GET  Aí : IF  A$=""  GOTO  780 
790  IF  AÍ="S"  THEN  RIJN 


C-64 

10  REM 
20  REM 

30  REM  NERVIOS 
40  REM 
50  REM 

60  P0KE53281 ; 3 

70  PR I NT " [ CLR  3 [ 2CRSRD  3 " 

80  PR I NTTAB  < 8 > " ENTRA [ SPC  3 EL [ SPC 3 NOMB 
RE  [ SPC  3 DEL  [ SPC  3 JUGADOR  í SPC  3 1 " 

90  INPUTPLÍ(l) 

100  PR I NTT AB  < 8 > " ENTRAC  SPC 3 EL  C SPC  3 NOM 
BRE  C SPC  3 DEL [ SPC  3 JUGADOR [ SPC  3 2 " 

110  INPUTPL$<2> 

120  PR I NT " C CLR  3 [ 2CRSRD  3 " 

130  PRINTTAB^ 15) " [ RVSON 3 C RED 3 NERV I OS 
[ RVSOFF  3 C BLU  3 C 2CRSRD  3 " 

140  PR I NTT AB  < 8 ) " I NTENT A [ SPC  3 ALCANZAR 
[SPC 3 500" 

150  PR I NTT AB  < 8 > " PUNTOS [ SPC  3 ANTES [ SPC  3 
QUE [ SPC  3 TU [ SPC  3 " 

160  PRINTTAB<8)  "OPONENTE.  [SPC 3 11 
1 70  PR I NT  TAB  < 8 ) " [ CRSRD  3 T I RAS [ SPC  3 LOS 
[ SPC 3 DADOS [ SPC 3 HASTA = " 

180  PR I NTTAB  < 8 ) " [ CRSRD  3 1 — [ SPC ] PLANTA 
RTEÍ8SPC3" 

185  PR I NTTAB < 8 ) " [ CRSRD  3 2- [ SPC  3 QUE [ SPC  3 
P I ERDAS [ SPC  3 POR [ 2SPC 3 " 

190  PR I NT T AB  < 8 ) " [ 2SPC 3 REPET I RÍSPC  3 EL 
[SPC 3 NUMERO [SPC 3" 

1 93  PR I NTTAB  < 8 ) “ [ 2SPC 3 DE [ SPC  3 TU [ SPC  3 
PRIMER [SPC 3 DADO [SPC 3" 

200  PRINT "[CRSRD 3" 

210  PR I NTTAB <1 2 ) " [ RVSON  3 [ CRN  3 PULSA [ SPC  3 
UNA [SPC 3 TECLA [BLU 3" 

220  GET  Ai  : IFA$=,M,THEN220 

230  PL=1 

240  0P=2 

250  CA<  0=200 

260  CA(2>=200 


270  GOTO300 

280  R0= I NT ( RND (1 ) *6  > + 1 NT  < RND < 1 > #6  > +2 
290  RETIJRN 

300  PR I NT " [ CLR  3 [ 2CRSRD  3 " 

310  PR I NTTAB < 9 > " [ RVSON 3 [ GRN 3 " ; PLi < PL 
> ; " [ BLU  3 [ RVSOFF 3 [ SPC  3 TU [ SPC 3 TURNO . 
[2CRSRD3 " 

320  GOSUB280 
330  FR=RO 
340  GOSUB280 
350  I FFR=RÜGGTO340 
360  GOTO410 

370  PRINT" [CLR 3 [2CRSRD3 " 

380  GOSUB280 

390  PR I NTTAB ( 9 ) " [ RVSON 3 [ GRN  3 " i PLi < PL 
) ; " [ BLU 3 [ RVSON 3 [ SPC  3 TU [ SPC  3 TURNO . 

[ 2CRSRD  3 » 

420  PR I NTTAB < 9 ) " PR I MERA [ SPC 3 T I RADA  " 

;FR 

430  PRINT" [CRSRD 3" 

440  PR I NTTAB ( 9 ) " ULT I MA [ SPC  3 T I RADA  " , 

RO 

450  PRINT "[CRSRD 3" 

460  TT=TT+RO 

470  PRINTTAB<9)  " TU  [SPC  3 TOTAL  [ SPC  JES  '■ 
";CA<PL> 

480  PRINT" [CRSRD 3" 

490  PR I NTTAB <9 > " BOTE  " , TT 
500  PRINT "[CRSRD 3" 

510  PR I NTTAB < 9 ) ; “ PUNTOS [ SPC 3 CONTRAR I 
0: ";CA<OP> 

520  PRINT "[CRSRD 3" 

530  PR I NTTAB < 1 2 ) " [ RVSON 3 [ RED  3 OTRA [ SPC 3 
T IRADA'-  [BLU  3" 

540  GETANt : IFANÍ=" "THEN540 

550  I FANi» " N " THENCA  < PL ) “CA  < PL ) +TT ■ GO 

TO580 

560  I FANi= " S " THENFORN® 1 TO 1 00  NEXTN : G 

OTO370 

570  GOTO540 

580  TT =0 

590  I FPL* 1 THENPL=2 -0P=1 : GOTO300 
600  ÜP=2 
610  PL=1 
620  GGTO300 

630  PR I NT " [ CLR  3 [ 2CRSRD 3 " 

640  PR I NTTAB (9) " TU [ SPC 3 P IERDES ! [ 2CRSRD 3 

II 

650  PR I NTTAB < 9 ) " T I ENES " ; 

660  Cfl  ( PL  > =C  A < PL  ) -TT 
670  PRINTCA(PL) 

680  PRINT" ( 2CRSRD 3 " ; TAB < 1 0 V [ RVSON 3 [ GRN  1 
PULSA [ SPC  3 UNA [ SPC  3 TECLA [ BLU  3 " 

690  GETAÍ; IFAf=" "THEN690 
700  TT=0 

710  PRINT" [CLR 3 " 

720  GOTO580 

730  PR I NT " [ CLR  3 [ 2CRSRD  3 " 

740  I FCA í 1 ) >CA < 2 ) THENPR I NTT AB < 9 ) PLi « 

1 ) ; " [SPC 3 GANA 1 1 " : PR I NTTAB  < 9 > " CON " ;CA 
< 1 ) : GOTO770 

750  PRINTTAB<9)PLÍ<2) ¡ " [SPC 3 GANA 1 1 " 

760  PR I NT " [ SPC  3 CON " C A < 2 ' 

770  PR I NTT AB < 1 2 ) " [ RVSON 3 [ GRN 3 JUEGAS [ SPC J 
OTRA [SPC 3 VEZ? [BLU 3" 

780  GET  Ai  IF  Aí=""  GOTO780 
790  IF  At="S"  THEN  RUN 


FIN 
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EXCURSION  POR  LA  MICROPROGRAMACION 

Cursillo  de  Lengua¡e 

Máquina  — V— 


<K 


Diroccionamionto  en 
Acumulador 

Esta  forma  de  direccionamiento 
utiliza  instrucciones  de  un  so  o 
ijvte  no  necesita  especificar  la 
dirección  donde  se  encuentra  el 

tipo  de  instrucciones  de  nuestros 
micros  lo  utilizan:  las  de  rotación 

» 2'S»-  - 

amiento  equivalen  a muluP Jcar 

o dividir  por  dos  el  contenido  del 

reeistro  A de  la  CPU,  depen 
diendo  de  que  el  desplazamiento 
sea  a izquierda  o derecha  respecti- 
vamente. 

Direccionamiento  Implícito 

Las  instrucciones  que  lo  utili- 
zan también  son  de  un  solo  byte  . 
Pues  como  su  nombre  indica,  el 
operando  va  implícito  en i la i ins- 
trucción. Por  ejemplo:  INX  signi- 

I fica  lNcrementar  el  registro-índice 
X y como  podéis  imaginar  no 
c hace  falta  especificar  nada  mas. 

Direccionamiento  Indirecto 

> Absoluto 

cAin  existe  una  instrucción  que 
3 ,o  uíilKs  >a  de  salto  indirecto 

\ SvSSH 

P PtS‘S“o,  modos  de  di, eco, o- 

p sírpsssssr^ 

->  Psteaa5 * * 8confus.onesend  BASIC 

r fmplementado  por  nuestros  orde- 

5 nadores. 

* Direccionamiento  Página 

Cero  Indexado 

Esta  forma  de  direccionamiento 

es  utilizada  aprovechando  los 
^ registros-índices  X e Y,  denomi 


Por  Diego  ROMERO 


utilizado.  Dado  que  se  trata  de 

fesí&ssísr 

preciando  el  acarreo  y el  resul- 
P do  es  la  dirección  en  la  pagina 
cero-  donde  se  encuentra  el  ope- 
rando de  la  instrucción. 

Direccionamiento  Absoluto 

Indexado 

Al  igual  que  el  anterior  puede 

ser  “Absoluto.X  o Absolu 
to  Y",  según  el  índice  utilizado. 

La  dirección  efectiva  del  ope- 
rando se  calcula  sumando  el  con- 
lenido  del  índice  a 
contenida  en  el  segundo  y tercer 
bvte  de  la  instrucción.  Este  modo 
jé  direccionamiento  es  muy  utili- 
zado por  nuestros  equipos  para 
acceder  a tablas  de  mensajes  que 
deben  salir  a pantalla,  valores 
que  deben  transferirse,  etc.,  es 
muy  útil  cuando  debemos  mane- 
ar en  una  rutina  datos  que  ocu- 
pan posiciones  de  memoria  conse 
cutivas. 

Diroccionamionto  Indexado 

Indirecto 

También  se  le  denomina  Pre- 
indexado,  ya  que  el  segundo  byte 
de  la  . nstrucción  se  suma  al  con- 
tenido del  registro  índice  X des 
preciando  el  arrastre,  la  dirección 
en  página  cero  a la  que  señala  a 
suma  contiene  la  parte i bW 
siguiente  la  parte  alta  de  la  dircc 
ción  real  del  operando  otra 

denominación  utilizada  es  la  de 

I “(Indirecto  X) 

Diroccionamionto  Indirocto 

Indoxado 

% Denominado  también  Post- 

■J2  ¡nHexado"  O “(Indirecto),  Y , el 

_]  ;rre“irSSS6nJ 
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. contiene  1.  P«« "SJS.'SS  1 

nes  diferentes.  IK^o  yp  acele- 

rrsuSioSp-»t 

gramación  en  o í :nstruccioncs 

Voy  a expliea  a^  ^ c6digos 

nido  de  las  apareciendo 

mnemónicos  q nos  vamos 

en  la  revista,  pa  Cn  en  este 

’^s=5rÉWK 

unos  grupos  d * (ej. 

más  grandes  q mnemónico  de  la 

jMP)’r¿sJV*- 

instrucción  fs  su  signifi- 

Uebajo  eneontra  lo  que 

cado,  que  en  j a una 
bemos  tomad  ,a  siguiente 

nueva  dirección  hace  ^ ins_ 

línea  Representado  con  símbo- 
truccion  represenia coloca  el  con- 

fesífssíBi 

lPS  íf  ,fd“  US» 


r 

:i.s==s 

rdebaio°dedeeilas  podemos  ver  unos 


&'SKK 
=‘iH 

código  '"áqdU'nc“laSs'sSasapod¿is 

15  y 

i6Fd"  r;^T¿- 1» 

r,n  de  direccionarmento  que 

modos  de  airee  ^ ^ gsa  ins- 

-SSfSSSÍS—- 


la  instrucción  en  ensamblador  y 

a esa  'nslruC'ldv  „Ue  poner  en 
modo,  lo  que  *¡e  y^emüPria  para 
una  posición  ^ ejecute 

quc  al  llegar  a ella da  V^^jern- 

esa  instrucción,  n pone- 

pl°  s>  en  la  posictó  m sys  2Q00> 

ScP™Síi'íatod'1'ind,q“ 

los  bytes  Wa,cnteS.cs  ue  nece- 
sita- 

fS  &5S.“  » 

sirve  para  co  dos  tardará 

»^nVrlui—a 

sys xgsrjítti 
Si- >&  VJS  s 

1*CPUd“T4«V4MHe,V<» 

frecuencia  de  *£33  microSc- 

gá«ssfc 

camos  el  periodo  por  er mi ^ 
de  ciclos  y tenemos.  3 u, 

‘"'para  dartdea  de  lo  rápido 
esPel  código  máquina  fre 

BASIC,  podemos  coger 

™'Kioa  irsSts 

GOTO  tarda  unosjój.bscgun^ 

dos,  que  son  • diferen- 

cié' Hasta  cí'pró'ximo  número. 


« 
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UNA  NUEVA  GENERACION 
DE  VIDEOJUEGOS 


CHOPfllTER 


HUSTIER 


SKRAMBLE 


MOON BUGGY 


Cass  2.200  BUGABOO  LA  PULGA  Cassette  2.000 

los  piogramas  para  Spectrum  son  comercializados  únicamente  v en  exclusiva  por  invesiromca.  S A 

Estamos  an  la  Feria  de  la  Informática. 

"EL  CORTE  INGLES"  Castellana,  del  4 al  28  de  Abril. 


CYCLONS  Cass  2.200 


COMMODORE  64 


CUDDLY  CUBURT  Cass  I 900 

/d  rrz 


MUTANT  CAMELS  Cass  2 200 


MATRIX 


COMMODORE  64 


SIREN  CITY 


Cass  1 900 


COMMODORE  64 

• SPRITE  MAN 

• FROGGER  64 

• SNAKE 

• ANIHILATOR 

• PAKACUDA 

• EXTERMINATOR 

• VORTEX  RAIDER 

• DEFENDER  64 

• LASER  ZONE 

• CHOPFLITER 

• ZAXXON 

• JUMPMAN 

• FORT  APOCAIIPSE 

• FUTBOLIN 

• HORACIO 

• PROCESADOR  TEXTOS 

• MAILING  Y ETIQUETAS 

• CONTABILIDAD 
PERSONAL 

• BASE  DE  OATOS 
FICHERO 

• ULTRABASIC 

• SINTHY64 

• FORTH  TINY 


SINCLAIR  ZX81 

IOO  PROGRAMAS 


DRAGON  32 

60  PROGRAMAS 


SINCLAIR  SPECTRUM* 

• PENETRATOR 

• TIME  GATE 

• EL  JUGADOR  DE  AJEDREZ 

• ASTROBlASTER 

• COMECOCOS 

• HORMIGAS 

• TRAXX 

• DISEÑADOR  DE  JUEGOS 

• LA  PULGA  ¡BUGABOO 

• BILLAR  AMERICANO 

• EL  PINTOR 

• MISILES 

• RAPTORES  DÉ  LA  GALAXIA 

• WiNGED  AVENGER 

• INVASORES  & GAL AXIANS 

• FORTH 

• BASÉ  DE  DATOS 

• MATEMATICAS 

• ARITMÉTICAS  BASICAS 

• TUTOR 


Cass,  1 700 


i 900 
I TOO 
I 800 
I 600 
I 7CO 
1 900 
I 700 

1 700 
T 700 
8 170 
7 190 
7 190 
6 290 
1 800 

2 200 
3 300 
3 300 


3 300 


3 30C 
2 900 
2 900 
2 900 


APPLE 

900  PROG 


®VIC  20 

200  PROG 


ATARI 

BOO  PROG 


IBM 

350  PROG 


SOLICITE  GRATIS  CATALOGO  GENERAL  INDICANDO  El 
ORDENADOR  SOBRE  EL  QUE  LO  DESEA 

CHIPS  &TIPS 


Ya  a la  venta  en 


El  Corte  Inglés  Sonitel 

Distribuidores  autorizados  y por  Correo 


ENVIAR  A:  indESnnmp  . Castellana,  1 79  Tel.  6563012.  Madrid  16^ 


CANTIDAD 

PRODUCTO 

PRECIO  UNIT 

T 0 T A l 

EMPAQUETADO  Y TRANSPORTÉ 

GASTOS  OE  ENVIO 

300 

Cari  B 173 


Cass.  2.200 


REVENGE  MUTANT  CAMELS  Cas  2.200 

r . . z 


i 


CUANDO  SE  TIENE  UN  COMMODORE  64 
ES  MUY  DIFICIL  SER  MODESTO 


Cuando  se  tiene  un  ordenador  personal 
con  64K  de  memoria,  una  magnífica  resolución, 
16  colores,  efectos  tridimensionales 
con  "sprites",  un  sonido  equivalente 
al  de  un  sintetizador,  un  teclado  profesional 
con  62  caracteres  gráficos, 
toda  una  amplia  gama  de  periféricos 
profesionales,  la  más  completa  serie 


de  programas  educativos,  profesionales 
y de  video-juegos...;  en  resumen,  cuando  se 
tiene  un  ordenador  personal  como  no  existe 
ningún  otro  en  el  mercado  y el  más  vendido 
mundialmente,  cuando  se  tiene 

el  Commodore  64,  es  muy  difícil  mostrarlo 
sin  que  el  orgullo  se  te  note. 


EL  ORDENADOR  PERSONAL  DE  LA  FAMILIA  MAS  POTENTE 

- Sistemas  de  gestión  profesionales  series  8000  Y 700.  - Ordenador  portátil  SX  64. 

- Ordenador  personal  COMMODORE  64.  - Ordenador  familiar  VIC  20. 


commodore 

COMPUTER 


MICROELECTRONICA  Y CONTROL.  S.A 
el  Taquígrafo  Serra,  7,  5 BARCELONA-29  c/  Princesa,  47,  3 " G MADRID-8 


